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Fuji ha messo 
tecnologie del futuro 
nei floppy disks 

I nuovi floppy disks Fuji Heawy Duty assicurano 
una durata di oltre 20 milioni di passaggi, con 
tracce error-free ai 100%. 

Innovativi per la struttura tridimensionale 
flessibile delle particelle magnetiche, 
la modulazione ridottissima, contenuta entro il 3%, 
il Super Hub Ring, parte integrante della 
struttura tridimensionale, e l’involucro resistente 
fino a 60°C, i floppy disks Fuji offrono oggi 
le tecnologie del futuro. 
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Giochi 

Stregherà milioni di italiani facendoli giocare, la novità che viene 
dall'America: si chiama Trivial Pursuit ed e destinato a diventare il gioco 
dell’anno. Per sperimentarlo in anteprima. Applicando ne propone una 
versione per Apple //. per di più personalizzabile . 


AppleWorks 

Ricordate quando le segretarie battevano a macchina le vostre lettere 9 
Meno male che a un certo punto hanno inventato i foglietti e i liquidi 
correttori, poi le macchine con correttore incorporato. Ma I immagine 
che si può dare di se. della propria azienda o dello studio professionale, 
con la corrispondenza quotidiana, può arrivare a stupire, se 


Utility 

Ci sono momenti in cui il ne. con tutti quei suoi bip. sembra ridere dei 
nostri errori. Che fare 9 La soluzione e semplice e davvero simpatica . 


Macintosh 

E’ certo che si rivelerà uno dei migliori software per Macintosh My 
Office, infatti, è un data base che permette anche di stampare lettere 
personalizzate e altro ancora Ed e disponibile in italiano Inoltre e già 
predisposto per il collegamento con la nuova LaserWriter della Apple 



Bioritmi 

Ci sono giornate in cui conviene non uscire nemmeno di casa, perché 
va tutto storto, e ci sono giorni baciati dal destino in cui si naviga sull'olio. 
Sarebbe bello conoscerli in anticipo e organizzarsi meglio la vita. Con il 
programma che calcola i bioritmi, forse 


Auto 

Volete sapere quanto consuma la vostra auto 9 Potete annotare 
percorrenza e litri di carburante e poi fare i relativi calcoli. Oppure, molto 
piu semplicemente, caricare su Apple questo programma e .. 


Grafica 

Avere il grafico di una funzione può essere inutile se poi non si possono 
esaminare i particolari del suo andamento in una certa zona. Se poi si 
deve vedere la differenza tra due curve diverse c e da fare un difficile e 
poco preciso lavoro di comparazione A meno che.. . 


Utility 

Per avere le scritte perfettamente centrate sia sul video che sulla 
stampante occorre tanta pazienza e tanto occhio. Oppure avere in 
memoria questo impaginatore 


ProDOS 

Prefix, Subdirectory. Pathname? Sono termini che bisogna conoscere 
per programmare in ProDOS. Questa utility non solo aiuterà a capire e 
imparare con facilità, ma. soprattutto.. . 


Oneliners 

Continua la serie degli appassionanti programmi compiuti in una sola 
linea. Eccone altri cinque. E prosegue il concorso... 


Machardware 

Può riprendere un’immagine o un testo, leggendolo dall’originale. 
L'immagine così ottenuta può essere trattata come un documento 
MacPaint, oppure trasmessa, via modem, a un altro Macintosh. 


Le rubriche 

6 Applichi 
11 Applicosa 

84 Applicando si trova anche qui 


91 Appli Help 

92 Lettere 

94 Disk Service 



Il gioco dell’estate, pag. 14 



My Office, pag. 33 


*************************************** 

* 2 

8-GIU-85 PROMENU 

03 45 

PM * 

* 

DIRECTORY 1 

PROGRAMMA 

* 

**** *** ******************************** 

PREFIX PROFILE/PGR/ 



BLOCKS FREE 8216 

BLOCKS IJSED 

1512 

NUM 

PROGRAMMA 

TYP 

MODIFICATO 

1 

INFERNO SHAPES 

BIN 

8-MAY-85 

0 80 

2 

INFERNO OBJ 

BIU 

' 3-MAY-85 

0 00 

3 

POMPIERI 

BAS 

8-MAY-85 

0 00 

4 

CIPCUITO 

BIU 

3-MAY-35 

0 00 

5 

DESIGNER 

BAS 

10-MAY-35 

0 00 

6 

TAUOLA PROGPAMM 

BIU 

3-MAY-35 

0 00 


TAUOLh ELETTPON 

BIN 

8 MAY -35 

0 00 

y 

PRETTYLISTEP AS 

BIN 

8-MAY-35 

0 00 

9 

PRETTYLISTEP IT 

BAS 

3-MAY-85 

0 00 

PREMI UN NUMERO SE 

UIJOI 

IJN PROGRAMMA 


0 --> PER '.'EDERE 

PAGINA 2 DI 

5 


0 ? PER AUERE AIUTO 



I segreti del ProDOS, pag. 67 
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applicando 


DIREZIONE GENERALE E AMMINISTRAZIONE 

IMìn unUm 

20122 Milano - Corso Monforte. 39 
Telefono (02) 702429 
Telex 350132 MACORM I 

DIRETTORE RESPONSABILE 
Stefano Benvenuti 

COLLABORATORI 
Adelio Barcella 
Aldo Brambilla 
Giorgio Caironi 
Gabriele Dardanoni 
Rossana Galliani 
Mario Magnani 
Francesca Marzotto 
Dolma Poli 
Domenico Semprini 
Enzo Tonti 

PUBBLICHE RELAZIONI 
Mauro Gandini 

REALIZZAZIONE EDITORIALE 
Editing Studio 



Tutti i diritti di riproduzione e traduzio¬ 
ne di testi, articoli, progetti, illustra¬ 
zioni, disegni, listati di programmi, fo¬ 
tografie ecc., sono riservati a termini 
di legge. I programmi pubblicati su 
Applicando possono essere utilizzati 
per scopi privati, scientifici e dilettan¬ 
tistici, ma ne sono vietati sfruttamenti 
e utilizzazioni commerciali. I mano¬ 
scritti, i disegni, le foto anche se non 
pubblicati, non si restituiscono. 


Servizio abbonamenti: Editronica srl. 
C.so Monforte 39, Milano - Conto Cor¬ 
rente Postale n. 19740208 - Una co¬ 
pia L. 5.000. Arretrati 7.000 lire. Abbo¬ 
namento 10 numeri (senza dono) L. 
40.000 (estero L. 60.000). Abbona¬ 
mento 10 numeri, piu le Pagine del 
Software per Apple, L. 50.000 (estero 
70.000). Periodico mensile - Stampa: 
Sagdos, Via Europa 22/28. Brugherio 
(MI) - Fotocomposizione: News, Via 
Nino Bixio 6, Milano - Fotolito: Medio- 
lanum Color Separation, Via Marcona 
3, Milano. € Copyright 1985 by Editro¬ 
nica srl - Registrazione Tribunale di 
Milanon.24del 15.1.1983-Pubblicità 
inferiore al 70% 


a 


Ormai la temperatura è quella estiva, ed è quindi ora di andare 
in vacanza, e questo numero di Applicando che, mi auguro, vi 
raggiungerà al mare, in montagna o in altri ameni luoghi di 
villeggiatura, un po' vacanziero lo è. Infatti si apre con un 
magnifico gioco, di cui sentirete tutti parlare nei prossimi mesi, 
perché verrà commercializzato in Italia con un grande lancio 
pubblicitario. In America è già da tempo ai primi posti nell'indice 
di gradimento dedicato ai giochi di società. Tra poco sapremo se 
anche gli italiani ne andranno pazzi. Noi pensiamo di sì, tant'è vero 
che ve ne offriamo una versione su dischetto. Naturalmente il 
meccanismo è leggermente diverso, ma non per questo meno 
"intrigante". E poi il programma può servire anche a molte altre 
cose, soprattutto in campo didattico. Basta leggere l’articolo a 
pagina 14 

E per scoprire se questa estate sarete in forma, a pagina 39 
trovate un programma per calcolare i bioritmi. Non un programma 
qualunque, ma qualcosa di più serio e approfondito di quanto 
normalmente diffuso in questo campo, un po' scientifico e un po' 
scherzoso nello stesso tempo. 

Non mancano naturalmente programmi "seri" come il calcolo 
dei consumi di benzina (pag. 46) o le utility come Promenu (pag. 
67), utilissima per avere in un programma i messaggi utente 
perfettamente impaginati, sia a video, sia sulla stampante. 

E ancora altre novità e sorprese. Una per tutte: la possibilità 
di abbonarsi al Disk Service, per poter richiedere cosi, a un prezzo 
davvero ridottissimo, tutti i dischetti che si desiderano (pag. 97). 

Il prossimo appuntamento è per il 15 settembre, con un 
numero davvero eccezionale da non perdere: 150 pagine di 
programmi, notizie, utility, novità... 
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Note, fonemi 
e urla 

Doris Norton è una compositrice che lavora 
esclusivamente sulla tastiera di un computer e 
crea quella che ama definire 'Tunica musica che 
sopravviverà". 


Lavorare al chiuso di uno 
studio stipato di attrezzatu¬ 
re elettroniche, tra le pareti 
metalliche di un apposito 
box per astrarsi compieta- 
mente dal mondo e creare 
affidandosi solo alla fantasia 
senza necessariamente pro¬ 
porre collegamenti con la 
realtà. Ecco l’ideale per 
quegli artisti che hanno sa¬ 
puto fondere la loro creati¬ 
vità con le enormi potenzia¬ 
lità dei computer. In questo 
caso è per la creazione di 
nuovi brani musicali, intera¬ 
mente derivati dalle possibi¬ 
lità del Macintosh e dalla 
notevole capacità program- 
mativa di questa giovane au¬ 
trice. 

Si chiama Doris Norton, 
fa la compositrice di musica 
e pare che sia piuttosto bra¬ 
va. Il suo ultimo LP, Artifi- 
cial Intelligence, è un chiaro 
esempio di quello che si può 
fare con un paio di Macin¬ 
tosh e un Apple // collegati 
tra loro e interfacciati a un 
sistema di sintetizzatori di 
suono in grado di interpreta¬ 
re i segnali generati dai cal¬ 
colatori. 

Doris Norton programma 
direttamente in linguaggio 
macchina e ha impostato i 
suoi programmi in modo che 
i due Mac con cui lavora di¬ 
ramino segnali digitali su 32 
canali separati, in ognuno 
dei quali viene trasmesso un 
complesso di "interventi" 
musicali. I campionamenti 
sonori che ha utilizzato per il 
suo ultimo LP sono ben 10 
(la sua voce, un organo litur¬ 
gico, un abbaiare di cane, un 
organo elettronico, il suono 
di piatti, una scarica elettri¬ 
ca, clangore di ferro battu¬ 
to, canto di uccelli, arpa e 
legni) cui va poi a sommarsi 


tutta la vastissima gamma di 
suoni generati dai compu¬ 
ter. 

Uno dei motivi di orgo¬ 
glio di Doris Norton è costi¬ 
tuito dall’aver potuto com¬ 
porre tutto il suo ultimo LP 
facendo uso esclusivamente 
della tastiera alfanumerica 
del computer. Il numero 
globale delle note e degli 
eventi codificati di Artificial 
Intelligence è di ben 
124.648, dei quali 123.827 
sono stati realizzati con il 
procedimento "step time" 
mentre i rimanenti sono sta¬ 
ti ottenuti in "reai time". 
Questa opera ha richiesto 
ben sei mesi di lavoro alla 
tastiera dei Macintosh per la 
progettazione e la program¬ 
mazione dei brani che com¬ 
pongono l’album i cui titoli 
(Artificial Itelligence, Ma¬ 
chine Language, Adavan- 
ced Micro Music, Sylicon 
Valley, Juno 106 Software, 
Norton Institute, Norton 
Musik Research, Ho Super- 
mac, Bit Killed Hertz, 
JX-3P Software) riflettono 
chiaramente gli intressi e gli 
intendimenti dell’autrice. 

Artificial Intelligence è il 
quinto album discografico di 
Doris Norton. I precedenti, 
tutti composti parzialmente 
con il computer, segnano le 
tappe della ricerca di Doris 
che è riuscita solo al quinto 
tentativo a produrre un LP 
interamente "costruito" e ge¬ 
stito con il computer. 

Attraverso una scheda di 
conversione A.D.A., Doris 
Norton è riuscita a inserire 
nel Mac i suoi parametri vo¬ 
cali, in particolar modo per i 
fonemi delle lettere 
A,0,U,E,D,M,Y,N che 
compaiono nel semplice te¬ 
sto "you and me" che rappre¬ 


senta tutta la parte vocale 
del brano "Norton Musik 
Research" di Artificial Intel¬ 
ligence. La vera novità (per 
la prima volta al mondo, af¬ 
ferma Doris Norton) è che il 
Mac, opportunamente pro¬ 
grammato, riesce a produr¬ 
re una vera e propria canzo¬ 
ne in modo del tutto umano, 
con una gamma vastissima 
di fonemi composti a partire 
dai singoli fonemi vocali 
umani introdotti inizialmen¬ 
te e gestiti poi interamente 
dal computer. 

Anche tutti gli altri suoni 
utilizzati per la composizio¬ 
ne dei brani sono stati prima 
registrati dal vero e poi, con 
un opportuno soft di cui Do¬ 
ris Norton va particolar¬ 
mente fiera, inseriti in me¬ 
moria ed elaborati a pia¬ 
cere. 

Le posizioni di Doris Nor¬ 
ton nei confronti della musi¬ 
ca tradizionale sono piutto¬ 
sto nette, ha un grande ri¬ 
spetto per tutti i tipi di musi¬ 
ca ma non crede nel futuro 
di alcun genere musicale che 
non sia generato dal compu¬ 
ter. Ha infatti dichiarato: 
"Penso che tra una ventina 
d’anni al massimo, la musica 
manuale scomparirà per 
sempre: io l’ho già fatta spa¬ 
rire da quattro anni; l’orec¬ 
chio dei giovanissimi si sta 
già orientando verso sound 
sempre più informatici e tec¬ 
nicamente perfetti." 


Dal punto di vista stretta- 
mente tecnico, Doris Nor¬ 
ton non ha alcun dubbio: 
"Oggi lavoro con due Ma- 
chintosh da 512 K, capaci di 
codificare 400.000 eventi 
musicali, e un Apple //e per 
gli effetti grafici. Non 

sono sponsorizzata da nes¬ 
suno ma ho la possibilità di 
utilizzare apparecchiature 
varie anche in anteprima 
con un rapporto di reciproca 
collaborazione con costrut¬ 
tori e importatori che in tal 
modo possono conoscere 
meglio le possibilità delle lo¬ 
ro apparecchiature. Attual¬ 
mente uso Apple, Roland, 
FTB, Maxwell, Re vox, Ca- 
bel, Viscount; se un giorno 
dovessi ritenere che qualche 
altro apparecchio può darmi 
migliori prestazioni non 
avrei difficoltà a cambiare. 
Sono però convinta che, al¬ 
meno per un decennio, Ma¬ 
cintosh dominerà in modo 
incontrastato". 

Dei suoi "colleghi" che 
fanno musica computerizza¬ 
ta non ha molta stima dato 
che ha dichiarato che oggi vi 
è molta confusione nella 
musica e che alcune delle at¬ 
tuali sperimentazioni elet¬ 
troniche sono da considerar¬ 
si come "oscuri prodotti del 
Medioevo ...cose che anche 
il mio splendido gatto sa fare 
camminando a caso su una 
tastiera e giocando casual¬ 
mente con i controlli". 


I principali strumenti di lavoro di Doris Norton. Questa 
compositrice non ha un rapporto preferenziale con le aziende 
del settore e sceglie i suoi strumenti solo in base alle 
prestazioni che può trarne. 
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"Ovunque mi compri 
sono garantito 
un anno, ma solo 

la SALS INFORMATICA 

mi assiste gratuitamente 
a casa". 


L offerta è valida per 
tutti i sistemi APPLE 
venduti dalla 
SALS INFORMATICA, 
a Genova, a partire 
dal 31 marzo 1985. 
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Il mio Ufficio! 
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Bianchi Giovanni 


29/06/85 

Memo 
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velame 

Bianchi Giovanni 

Titolo 

! Dott. 

Indirlo 

Via Rossi 121 


Città 

jprov. ! Codice 

Modena 

1 MO I 00344 

Ditto 

1 Att: 

Bianchirti e Affini Srl 

I Giovanni Bianchi 

Formulo 

Caro Giovanni 

Altro 

Telefono 

Creozione 

343434 

29/06/85 


Completamente in italiano, Per impostare fatture in cui 
facilissimo da usare, basta inserire le quantità 
totalmente integrato. vendute e i prezzi unitari 
Per archiviare esattamente per ottenere i relativi totali. 

come avviene con Per stampare e mettere 
i classificatori tradizionali, nell'ordine desiderato 

Per predisporre carte le etichette degli indirizzi... 
intestate esattamente come 
avviene nelle tipografie. 

Per stampare lettere 
personalizzate senza fatica. 
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Un programma per il tuo FTìacintosh 
da provare subito. 

Compralo! Oppure ordina il Demo. 
Siamo sicuri che ti convincerà. 
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□ Sì, desidero acquistare My Office. Scelgo la seguente formula di 
pagamento: 


□ Accludo assegno non trasferibile di lire 295mila (Iva e spese 
di spedizione comprese) intestato a Editronica srl. 

□ Accludo ricevuta di versamento su conto corrente postale n. 
19740208 intestato a Editronica srl, di lire 295mila (Iva e 
spese di spedizione comprese). 


□ Sì, desidero provare My Office. Speditemi il dischetto Demo al 
prezzo di lire 25mila (Iva e spese di spedizione comprese). Resta 
inteso che se acquisterò poi il programma tale importo mi verrà 
scontato sul prezzo d’acquisto, e potrò quindi ricevere My Office al 
prezzo di lire 270mila anziché 295mila. Scelgo la seguente formula 
di pagamento: 

I Q Accludo assegno non trasferibile di lire 25mila (Iva e spese 
di spedizione comprese) intestato a Editronica srl. 

□ Accludo ricevuta di versamento su conto corrente postale n. 
19740208 intestato a Editronica srl, di lire 25mila (Iva e 
spese di spedizione comprese). 




Nome e Cognome 


Indirizzo.Cap 

Città.Prov 

► 


Ritagliare e spedire in busta chiusa a: Editronica srl, 
Corso Monforte 39, 20122 Milano. 

















































































































sul tuo personal 


Da oggi puoi collegare il tuo personal a Pagine Gialle 
Elettroniche. Un servizio nuovo ed unico, realizzato da 
SEAT e SARIN, che trasforma il tuo personal in un grande li¬ 
bro elettronico tutto da consultare. Con semplici comandi in 
lingua italiana ti permette di avere, sul tuo personal compu¬ 
ter ed in tempo reale, informazioni tecnico-commerciali su 
oltre 800.000 aziende, selezionandole da una banca dati 
continuamente arricchita. Con Pagine Gialle Elettroniche 
scegli così, su tutto il mercato, le offerte relative ai prodotti e 
ai servizi che più servono alla tua azienda. Una perfetta inte¬ 
grazione tra un sistema capillare di raccolta dati e una tec¬ 
nologia all’avanguardia nel campo della telematica è alla 
base del servizio Pagine Gialle Elettroniche, oggi disponibi¬ 
le suf più diffusi personal computer APPLE, IBM, OLIVETTI. 

Se vuoi saperne di più, il tuo concessionario sarà lieto di 
darti ulteriori informazioni. 


c 

PAGINE GIALLE 
ELETTRONICHE 




SARIN/AP 























Posta 

elettronica 

Oggi la velocità di dare o 
ricevere messaggi rappre¬ 
senta una delle necessità 
fondamentali di chi compie 
un’attività lavorativa evolu¬ 
ta. Coloro che usano abi¬ 
tualmente un personal com¬ 
puter per lavorare possono 
beneficiare del servizio di 
Posta elettronica che propo¬ 
ne la P.E.I.S., qualsiasi pos¬ 
sa essere la macchina instal¬ 
lata sia in trasmissione che 
in ricezione. 

Lo schema organizzativo 
della Posta Elettronica In¬ 
ternational Service è sempli¬ 
ce: con una telefonata al più 
vicino "host" della rete, si 
può lasciare un messaggio 
per uno degli abbonati. La 
riservatezza della comunica¬ 
zione è garantita da una pas¬ 
sword segreta che impedisce 
la divulgazione di notizie ri¬ 
servate ad eventuali "curio¬ 
si". Il servizio della P.E.I.S. 
provvederà quindi a rendere 
disponibile la comunicazio¬ 
ne al destinatario al primo 
collegamento con la rete. In 
pratica questo vuol dire che 
ogni utente può spedire e ri¬ 
cevere messaggi senza la ne¬ 
cessità di un collegamento 
diretto, le caselle elettroni¬ 


che del Servizio consentono 
quindi di ignorare le diffe¬ 
renze di fuso orario nelle co¬ 
municazioni intercontinen¬ 
tali e di avere la certezza del¬ 
la ricezione di un messaggio 
importante con una sempli¬ 
ce interrogazione al più vici¬ 
no "hoster". 

Attualmente la rete italia¬ 
na comprende 19 città con 
decine di linee telefoniche 
abilitate al servizio. I costi 
sono assolutamente compe- 



Tramite modem si può 
utilizzare il servizio di Posta 
Elettronica con collegamenti 
sicuri con qualsiasi altro 
computer. 


titivi con i canali tradizionali 
di comunicazione. L’invio 
delle lettere è a carico del 
mittente (per una lette¬ 
ra-tipo il costa è di circa 
1.000 lire) e gratuito per il 
destinatario. Il costo del¬ 
l’abbonamento annuale è 
attualmente di 95.000 lire. 
La configurazione richiesta 
per potere usufruire del ser¬ 
vizio è costituita da un qual¬ 
siasi home o personal com¬ 
puter dotato di un soft per la 
trasmissione dei dati e di un 
modem o di un accoppiatore 
acustico. 

Per ulteriori informazioni 
rivolgersi a: P.E.I.S., via 
Carbonara 1, 40126 Bolo¬ 
gna, telefono 051/267839. 


Contro i pirati 

La Apple Computer, uni¬ 
co produttore di hardware, 
insieme ad alcune delle più 
importanti aziende che ope¬ 
rano nel settore del software 
come la Bits & Bytes, la 
E.I.S., la J.Soft, la Master- 
tronic, la Micropro, la SCT 
e la Sisteda hanno recente¬ 
mente costituito l’Assoft, 
Associazione Italiana per la 
Tutela del Software. 

Scopo dell’associazione è 
la tutela del software da ogni 
abuso commerciale che dan¬ 


neggi gli autori, i produttori, 
i distributori e gli utenti. Si 
tratta della prima iniziativa 
italiana per la tutela del soft¬ 
ware originale tesa a scorag¬ 
giare e combattere tutte le 
forme di diffusione illegale 
del software. 

Primo progetto della As- 
soft, per poter varare misure 
concrete, è quello di acco¬ 
gliere tra gli associati il mag¬ 
gior numero di aziende del 
settore; con una base vasta e 
forte sarà poi più semplice 
ed efficace attuare le oppor¬ 
tune iniziative tese a scorag¬ 
giare il fenomeno della "pi- 
racy" che, apportando con¬ 
fusione a scompiglio sull’u¬ 
tenza, danneggia l’operato 
delle ditte più serie. 

Per ulteriori informazioni 
rivolgersi a Marzia Santago- 
stino, Apple Computer Ita¬ 
lia, telefono 02/8242156. 

Un corso 
per la grafica 

Che il computer sia lo 
strumento di lavoro di do¬ 
mani è certo una verità che 
nessuno osa più contraddi¬ 
re. Per prepare la nuova ge¬ 
nerazione di tecnici sorgono 
quindi corsi sempre più spe¬ 
cializzati sulle applicazioni 
dei computer. 

In particolare la grafica 
attrae molti per le stupefa¬ 
centi possibilità creative che 
l’operatore ha a disposizio¬ 
ne con un computer oppor¬ 
tunamente programmato. 
La P Design organizza un 
corso di computer grafica 
che permette anche ai meno 
addetti ai lavori una notevo¬ 
le qualificazione professio¬ 
nale. Gli argomenti del cor¬ 
so, superata una fase stretta- 
mente propedeutica sui 
computer in genere, tratta¬ 
no temi, con esercitazioni 
pratiche, di sicuro interesse 
sia per il disegno che per l’a¬ 
nimazione e la manipolazio¬ 
ne di immagini per la televi¬ 
sione. 

Per ulteriori informazioni 
rivolgersi a P Design, piazza 
Aspromonte 29, 20131 Mi¬ 
lano, Telefono 02/273413 - 
223922. 
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La scheda di interfaccia e il dischetto del relativo soft per la gestione I/O di dati esterni. 


Tutto 

sotto controllo 

La scheda Analog Con¬ 
nection della americana 
Strawberry Tree permette 
di interfacciare all'Apple 
//e, //c qualsiasi sensore in 
grado di fornire segnali ana¬ 
logici o digitali. Il soft acclu¬ 
so permemette, con la mas¬ 
sima facilità, l’acquisizione 
e il controllo di unità ester¬ 
ne. 

Ideale per usi di laborato¬ 
rio o per monitoraggio e 
controllo di processi indù- 
strali, con 8 o 16 canali di 
I/O ( a seconda dei modelli), 
consente di spegnere e ac¬ 
cendere tramite relais qual¬ 
siasi macchina o sistema 
quando i dati rilevati dai 
sensori superano in eccesso 
o in difetto un campo prefis¬ 
sato. Analogamente è possi¬ 
bile attivare un segnale di 
output quando succede un 
certo evento registrato dai 
sensori. Inoltre la possibilità 
di registrare su disco o stam¬ 
pare i dati dei sensori per¬ 
mette l’analisi completa di 
eventi anche complessi oltre 
a rendere immediatamente 
disponibile i massimi, i mini¬ 
mi, le medie o le differenze 
delle registrazioni effettua¬ 
te. 

È possibile impostare per 
ogni ingresso il fondo-scala 
delle letture analogiche e di¬ 
gitali e l’unità di misura dei 
dati. In caso di interruzione 
della corrente il sistema è in 
grado di ripristinarsi in mo¬ 
do del tutto autonomo. 

Le applicazioni di questa 
scheda "aprono le porte del 


mondo'' all’Apple permet¬ 
tendo, ad esempio, di gesti¬ 
re autonomamente e con la 
massima semplicità un im¬ 
pianto di riscaldamento con¬ 
dominiale, o il processo pro¬ 
duttivo di una macchina 
operatrice o ancora la ge¬ 
stione dei dati acquisiti in la¬ 
boratorio durante un esperi¬ 
mento complesso. In parti¬ 
colare per i sensori a termo¬ 
coppia che rilevano la tem¬ 
peratura, il menù del soft al¬ 
legato permette di scegliere 
tra dieci diversi tipi di ter¬ 
mocoppia ed è in grado di 
linearizzare l’input e com¬ 
pensare le giunzioni fredde. 

Le schede esistono anche 
per IBM e compatibili e so¬ 
no importate e distribuite 
dalla ELCOM, corso Italia 
149, 34170 Gorizia, tei. 
0481/30909. 


Hard 

ma con copia 

Uno dei problemi mag¬ 
giori che si hanno quando si 
adotta un Hard-disk è co¬ 
stituito dalla impossibilità di 
copiare il supporto magneti¬ 
co su altro supporto traspor¬ 
tabile. Adesso c’è AMS II, 
un hard disk per Apple II 
dotato di un drive per un 
floppy su cui può essere ri¬ 
prodotta fisicamente una 
copia dei dati. 

Il disco rigido ha 4 testine 
e un tempo di accesso medio 
di 78 ms con 10 Mb di me¬ 
moria mentre il floppy drive 
consente una copia da 655 
Kb in circa 30’. Molto utile 
la possibilità di ripartire la 
formattazione del disco rigi¬ 
do in zone destinate ai vari 
sistemi operativi. In partico¬ 
lare il soft fornito in dotazio¬ 
ne consente di formattare 
143 Kb per il DOS small voi, 
409 Kb per il DOS large voi, 
da 0 a 8 Mb per il CP/M, da 0 
a 9 Mb per il ProDOS e da 0 
a 9 Mb per il Pascal. In tal 
modo è possibile utilizzare i 
vari sistemi operativi dei 
programmi per Apple II 
senza dover operare una 
scelta limitativa. 

Per ulteriori informazioni 
rivolgersi alla Siprel Srl, via 
di Vittorio 82, zona indu¬ 


striale Baraccola, 60020 
Candia (AN), telefono 
071/8046305. 

La pulizia 
prima di tutto 

Non si tratta della solita 
solfa che le mamme propi¬ 
nano di continuo ai loro pic¬ 
cini per insegnare il rispetto 
dell'igiene personale, ma 
della reale necessità che ha 
ogni possessore di personal 
computer per prolungare la 
vita della propria apparec¬ 
chiatura. 

Polvere, fumo, residui so¬ 
no da sempre i nemici più 
comuni dei sistemi compu¬ 
terizzati. Un tempo, quando 
i computer erano ancora 
mastodonti a cui si poteva 
dedicare interi locali, il di¬ 
vieto assoluto di fumare e 
una serie di compiessi dispo¬ 
sitivi risolveva il problema, 
ma oggi, con i computer di¬ 
ventati sempre più piccoli e 
potenti in relazione alle loro 
dimensioni, e con la loro dif¬ 
fusione a tutti i livelli, non 
resta che la pulizia periodica 
delle parti per garantire loro 
una adeguata longevità. 

A queste esigenze ha pen¬ 
sato la Verbatim, già notissi¬ 
ma per i suoi supporti ma¬ 
gnetici, con la linea Verba¬ 
tim VPC. Si tratta di prodot- 


L’Hard disk per Apple II dotato di floppy per le copie 
fisiche della memoria 
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ti già ampiamente sperimen¬ 
tati in grandi sistemi di cal¬ 
colo che adesso vengono of¬ 
ferti anche per la cura dei 
personal ed home compu¬ 
ter. Si compone di cinque 
prodotti per la protezione 
dalla polvere, dal fumo e 
dalle impronte umane (che, 
come è noto, sono estrema- 
mente contaminanti). Parti¬ 
colarmente degni di menzio¬ 
ne sono il pulisci testina per 
le unità a dischi da 5" e 1/4, il 
sistema per la pulizia delle 
superfici in plastica, un si¬ 
stema completo antistatico e 
il kit per la pulizia delle testi¬ 
ne delle stampanti a mar¬ 
gherita. 

Per ulteriori informazioni 
rivolgersi a: Chiappe & 
Partners, telefono 
02/468100 - 432041. 

Aumentare 

l’efficienza 

Il vostro Apple è certa¬ 
mente in grado di darvi delle 
grosse soddisfazioni perché 
è veloce, potente e dotato 
del software necessario per 
le applicazioni che vi inte¬ 
ressano. Ma per aggiungere 
efficienza al vostro sistema 
avete bisogno di non aspet¬ 
tare che la stampante abbia 
finito di lavorare. 

Soprattutto per coloro 
che usano l’Apple per l’ela¬ 
borazione di testi e hanno 


necessità di stampare spesso 
rapporti di aggiornamento 
in cui siano compresi gli ulti¬ 
mi dati inseriti, il tempo di 
stampa può divetare un ele¬ 
mento che riduce l’efficien¬ 
za del sistema. La soluzione 
giusta per poter sfruttare al 
meglio la propria macchina 
si chiama in questo caso 
Printer Buffers, una perife¬ 
rica di accumulo dei dati da 
stampare che annulla prati¬ 
camente i tempi di attesa per 
la stampa. I Printer Buffers 
della Pertel non fanno altro 
infatti che accumulare i dati 
da inviare alla stampante "li¬ 
berando" l’unità centrale. I 
dati raggiungono la periferi¬ 
ca in modo del tutto autono¬ 
mo, mentre l'operatore può 
proseguire il suo lavoro sen¬ 
za inutili attese. In tal modo 
è possibile lavorare veloce¬ 
mente anche con periferiche 
relativamente "lente" come 
sono ad esempio i pk)tter. 

Proposti in varie versioni 
con memorie da 16 Kb sino a 
96 Kb, i Printer Buffers sono 
un complemento veramente 
utile per tutti i professioni¬ 
sti. 

Per ulteriori informazioni 
rivolgersi alla Pertel, via Or- 
mea 99, 10126 Torino, tele¬ 
fono 011/655865-651754. 

Basic Writer // 

Si tratta di una interessan¬ 
tissima estensione del noto 


Apple Writer, il soft di ela¬ 
borazione dei testi per Ap¬ 
ple //. Questo Basic Writer 
presenta la notevole caratte¬ 
ristica di collegare la stesura 
dei testi con il Basic Apple¬ 
soft; in tal modo non solo è 
possibile utilizzare, nel cor¬ 
so della stesura di un testo, 
numeri e testi elaborati di¬ 
rettamente da un program¬ 
ma in Basic, ma anche utiliz¬ 
zare una serie di funzioni ag¬ 
giuntive che ampliano di 
molto la versatilità di questo 
soft. 

Per esempio è sempre di¬ 
sponibile per l’utente una 
super-calcolatrice con le 
normali operazioni artmeti- 
che, le funzioni trigonome¬ 
triche e i principali operatori 
matematici. Inoltre è dispo¬ 
nibile un programma per 
stampare grafici nel corso di 
un testo e altre interessanti 
funzioni per il controllo dei 
due "ambienti" (l’elabora¬ 
zione del testo e il basic Ap¬ 
plesoft) che convivono nello 
stesso soft. Particolarmente 
curata la distinzione dei co¬ 
mandi di stampa e del basic 
dai testi in modo che non 
possano essere confusi dal¬ 
l'operatore e accidentaj- 
mente alterati nel corso del¬ 
la scrittura del testo. 

Una funzione di sovrap¬ 
posizione continua permet¬ 
te di lavorare su documenti 
esistenti o su moduli prede¬ 
finiti, mentre la scelta del 
carattere di tabulazione per¬ 
mette la scelta di simboli di 
tabulazione diversi dallo 
spazio (ad esempio i punti o 
i trattini). Il set di caratteri 
che può essere scelto per la 
stampa agisce direttamente 
sui caratteri della stampante 
e non compare sullo scher¬ 
mo. 

Basic Writer può essere 
usato con la configurazione 
minima dell’Apple //e dota¬ 
to di scheda di espansione 80 
colonne e 64 Kb aggiuntivi o 
Apple //c, stampante Apple 
ImageWriter o Dot Matrix 
Printer o Epson MX III, 
RX, FX e programma Ap¬ 
ple Writer // (versione DOS 
3.3, italiana o americana). 

Basic Writer colpleta 
quindi la linea dell’ Apple 


Il buffer di accumulazione per la stampante che “libera” 
immediatamente il computer. 



Writer che comprende già il 
programma Util Writer 
(particolarmente indicato 
per le applicazioni da uffi¬ 
cio) e il programma Pro 
Writer (specializzato per la 
stampa dei documenti). 

Per ulteriori informazioni 
rivolgersi a: Polisistemi, via 
Derna 19, Milano, telefono 
02/2842890. 


Sicpack sarà 
capostipite 

Un accordo tra la Apple 
Computer SpA e la Softing 
Srl ci permette di anticipare 
che molto presto la bibliote¬ 
ca di Macintosh avrà una va¬ 
sta libreria per l'ingegneria 
civile. Il programma Sic¬ 
pack 2.0 che abbiamo già 
presentato in un numero 
precedente di Applicando , 
l’unico oggi in grado di ese¬ 
guire calcoli di struttura e di¬ 
mensionamenti senza la ne¬ 
cessità di inserire dati nume¬ 
rici nel computer, sarà pre¬ 
sto affiancato da altri pro¬ 
grammi che utilizzano le no¬ 
tevoli possibilità offerte da 
Mac. 

La nuova biblioteca di 
soft consentirà quindi di di¬ 
segnare direttamente le 
strutture sullo schermo tra¬ 
mite il mouse, di precisare 
graficamente il tipo di carico 
lasciando a Mac il compito 
di quantificare le misure e di 
calcolare il dimensionamen¬ 
to delle strutture pur nelle 
più rigorose procedure di 
calcolo dell’ingegneria civi¬ 
le. 

Il pacchetto Sicpack 2.0 è 
stato presentato al Romauf- 
ficio 85 e ha riscosso un no¬ 
tevole successo tra gli addet¬ 
ti ai lavori. Prossimamente 
uscirà Macsap, un program¬ 
ma di analisi della struttura 
sia statica che dinamica con 
gli elementi finiti implemen¬ 
tato dal corrisponedente 
pacchetto già esistente per 
Lisa. 

Per ulteriori informazioni 
rivolgersi alla Softing Srl, 
via Reggio Calabria 6,00161 
Roma, telefono 06/4248732. 
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Per Trivia ci si travia 



Stregherà milioni di 
italiani facendoli 
giocare, la novità che 
viene daH’America: si 
chiama Trivial Pursuit 
ed è destinato a 
diventare il gioco 
dell’anno. Per 
sperimentarlo in 
anteprima Applicando 
ne propone una 
versione per Apple //, 
perdi più 

personalizzabile e 
quindi utile anche per 
studiare o ripassare, 
oltre che per divertirsi... 


A ltro che Monopoli! In America 
ha fatto furore: un milione e 
quattrocentomila pezzi venduti, gio¬ 
catori entusiasti, tornei improvvisati 
ovunque. C’è qualcosa, in questo gio¬ 
co, che attanaglia l’attenzione dei con¬ 
correnti, non lascia loro un attimo di 
respiro, non permette che smettano... 
È nuovo, si chiama Trivial Pursuit e 
sta per sfondare anche in Italia (è in 
vendita dalla fine di giugno a 89 mila 
lire nei negozi specializzati). Sarà il 
gioco dell’anno? Gli esperti dicono di 
sì, senza dubbio alcuno. Ma come è 
fatto, cos’è, come funziona? 

Il meccanismo della vittoria è quel¬ 
lo, eterno, visto e stravisto, del percor¬ 
so a caselle; il solito gioco dell’oca, 
allora? No, perché nuovissima è la tec¬ 
nica utilizzata per gli spostamenti: non 
solo dadi, non più premi o castighi 
stabiliti alla cieca dalla dea Fortuna, 
ma un’infinità di domande sui più vari 
argomenti, a cui bisogna saper rispon¬ 
dere. Vince così chi è più informato e 
ha più memoria, cioè il migliore, final¬ 
mente! 




























Non appena compare la domanda, 
infatti, scatta un conteggio alla rove¬ 
scia, che comincia da 100; risponden¬ 
do esattamente vi assicurate tanti pun¬ 
ti quanti sono i secondi ancora dispo¬ 
nibili dopo la risposta. Se per esempio 
vi ci vogliono trenta secondi per indivi¬ 
duare la risposta corretta, il vostro 
punteggio è settanta; se poi rispondete 
in venti secondi alla domanda succes¬ 
siva, vi aggiudicate altri ottanta punti e 
il vostro punteggio complessivo sale a 
centocinquanta, e così via. Sette sono 
le domande, settecento i punti teorica¬ 
mente cumulabili. Quante volte si può 
giocare? Infinite. Al termine di ogni 
"partita" si può giocarne un’altra con la 
sicurezza di non ripetere un gioco già 
fatto: con 400 domande a disposizione 
e il meccanismo della scelta casuale, 
ogni volta che giocherete sarà una sor¬ 
presa. 

Ci sono però, come in tutti i giochi, 
anche le penalità: se scegliete una ri¬ 
sposta errata perdete venticinque pun¬ 
ti. In questo modo vi è risparmiata la 
tentazione di premere in rapida suc¬ 
cessione tutti e quattro i tasti possibili: 
rischiereste infatti di perdere così ben 
settantacinque punti! Conviene senza 
dubbio il fair play: scegliete la risposta 
che vi sembra giusta, sceglietela quan¬ 
to più in fretta riuscite; se dovesse ri¬ 
sultare errata (un severissimo beep vi 
informerà), pazienza, provate con 
un’altra; ma non fate la scelta a caso! 
Tanto più se volete allenarvi per Tri- 
vial Pursuit, quello che si gioca senza 
computer: lì, infatti, non si tratta di 
scegliere tra varie soluzioni possibili, 
ma proprio di conoscere, e dire, la 
risposta esatta. 

All’inizio del gioco potete scegliere 
se leggere o no le istruzioni, che sono 
poche e chiarissime; dopo di che com¬ 
pare la prima domanda e il timer scat¬ 
ta. Dopo che la risposta esatta è stata 
selezionata, fa la sua apparizione la 
seconda domanda, poi la terza, e 


quando verrete sfidati nel gioco del¬ 
l’anno, sarete già esperti del suo mec¬ 
canismo e, soprattutto, conoscerete 
già le risposte relative a un buon nu¬ 
mero di domande. 

E se un domani le avrete imparate 
già tutte, e il gioco non vi coglierà più 
impreparati, non avrete che da modifi¬ 
carlo, introducendo domande nuove, 
risposte su misura, trabocchetti a pia¬ 
cere: il programma TRI VI A è aperto 
a tutti gli interventi. Ma soprattutto, 
proprio perché consente di creare le 
proprie domande e le proprie risposte, 
può essere usato anche per fini didatti¬ 
ci: per esempio preparando 400 do¬ 
mande di storia con le relative rispo¬ 
ste. 


Come si gioca 

Calcio, ciclismo, atletica; politica, 
guerra, diplomazia; cinema, letteratu¬ 
ra, musica; storia; geografia, scien¬ 
ze... Non c’è argomento, o quasi, che 
sfugga a TRI VI A, implacabile inquisi¬ 
tore. Le domande (Applicando ne ha 
già predisposte 400 tonde tonde per la 
versione su dischetto ordinabile attra¬ 
verso il Disk Service, a pag.94, mentre 
chi copia il listato dovrà poi inventarsi 
domande e risposte) compaiono sul vi¬ 
deo una alla volta, accompagnate da 
un quartetto di possibili risposte; quel¬ 
lo che il giocatore deve fare, natural¬ 
mente, è selezionare la risposta giusta, 
e nel minor tempo possibile. 




Di questo gioco il programma che 
Applicando vi propone non ha solo il 
nome: delle 400 domande che il com¬ 
puter vi sottoporrà nella versione su 
dischetto ordinabile attraverso il Disk 
Service, infatti, la maggior pajte è 
tratta dalle fatidiche cartelline firmate 
Trivial Pursuit che stanno entusia¬ 
smando milioni di giocatori. TRIVIA 
per allenarsi a Trivial Pursuit, dunque: 













avanti così fino alla settima. In basso a 
destra c’è il vostro punteggio, che va 
aumentando via via che giocate; in 
basso a sinistra il contasecondi, che a 
ogni nuova domanda riparte da cento. 
Alla fine il computer sentenzia: il vo¬ 
stro livello intellettivo è buono, infe¬ 
riore alla media, notevole, quasi pas¬ 
sabile, brillante... dipende dal punteg¬ 
gio. E, a dire la verità, TRIVI A non è 
propriamente di manica larga: se vole¬ 
te sentirvi dire che la vostra è un’intel¬ 
ligenza brillante dovete un po’ sudare. 
Non prendetevela, quindi, se le prime 
volte un programma screanzato, come 
TRIVI A è, vi darà dell’interdetto; si 
dà un po’ di arie perché lui le risposte 
le conosce tutte... 

Descrizione 
del programma 

Fra le caratteristiche del gioco c’è 
una importantissima utility che per¬ 
mette di modificare il file, aggiungen¬ 
do domande o aggiornando quelle già 
introdotte. Il TRI VI A infatti è stato 
ideato in base a tre criteri: la possibili¬ 
tà di immettere facilmente le domande 
in un file su dischetto ad accesso casua¬ 
le, per tenere al minimo le esigenze di 
memoria; la possibilità di modificare i 
record delle domande già esistenti per 
tenere aggiornato il file; la possibilità 
di presentare le domande in modo di¬ 
vertente e stimolante. Ne sono risulta¬ 
ti di fatto due programmi: TRI VI A- 
.FILER e TRI VI A. 

TRIVIA.FILER crea un file ad ac¬ 
cesso casuale che può contenere fino a 
400 domande e risposte. Ogni record 
del file contiene quattro risposte e 
quattro domande: quando si fa una 
qualsiasi delle domande di quel grup¬ 
po la risposta giusta sarà da scegliere 
fra una di quelle domande. Ogni do¬ 
manda e ogni risposta di ciascun re¬ 
cord possono essere esaminate e mo¬ 
dificate se necessario. TRI VI A, inve¬ 
ce, è il gioco vero e proprio, di cui 
sapete già tutto. 

Come digitare 
TRIVIA.FILER 

Per digitare TRIVIA.FILER si in¬ 
troduca dapprima il programma in 
Applesoft visibile nel listato 1 e lo si 
salvi su dischetto con il comando: 


SAVE TRIVIA.FILER 


Poi si introduca il programma visibile 


Listato 1 


1 REM ********************** 

2 REM * TRIVIA.FILER * 

3 REM * 01 SCOTT JACKSON * 

4 REM * (0 1985 BY * 

5 REM * APPLICANDO & * 

6 REM * MICROSPARC, INC. * 

? REM ********************** 

100 DOS? = CHR$ (4) 

110 0NERR GOTO 1050 
120 G0SUB 1120: 0NERR GOTO 1270 
130 TEXT : HOME 
140 VTAB 1: HTA8 (20 - ( LEN (SLf) / 2)): PRIMI SL*: VTAB 4 

: HTAB 10: PRIMI *— TRIVIA F1LER 
150 VTAB 7: PRIMI “ :!: INSERIRE GRUPPO DOMANDE' 

160 PRIMI : PRINT 1 :2: SCRIVERE GRUPPO DOMANDE 0 

170 PRINT : PRINT * :3: FINIRE" 

180 VTAB 20: PRINT "(C) 1985 BY APPLICANDO 4 MICROSPARC, IN 
C": VTAB 15: INPUT "SCEGLI L'OPZIONE: *;Y* 

190 IF Y* = "1" THEN GOSUB 230 

200 IF li = “2" THEN GOSUB 640 

210 IF Y$ = "3" THEN HOME : END 

220 GOTO 130 
230 REM 

240 IF RN > = 99 THEN HCME : PRINT CHRS (7): CHRì (7): P 
R1NT "IL PILE DELLA DOMANDA E' PREDISPOSTO/: PRINT : 1 
NPUT 1 (RETURN) PER CONTINUARE: ";Y4: RETURN 
250 HCME : PRINT "QUESTO SARA' IL RECORD N.";RN +1;" SU 
99." 

260 FOR I = 1 T0 40: PRINT NEXT 

270 VTAB 4: FOR I = 1 10 4: HTAB 1: PRINT "RISPOSTA N.";I; n 

:": INPUT ";A$<I>:A*<I) = LEFTf (AMI),35): NEXT 
280 P0KE 34,16: RIME 

290 FOR I = 1 TO 4: PRINT "DOMANDA N.";I; ": INPUT "" :Qt<] 
):Q$(I) = LEFTI (QIC 11,159 ) 

300 INPUT "RISPOSTA GIUSTA =’:CI(1) 

310 IF 'VAL (C$(I)> < 1 OR VAL (C$<1)) ) 4 THEN PRINT CH 
I» (7);: GOTO 300 
320 NEXT 
330 TEXT : HOME 

340 FOR I = 1 T0 4: PRINT I:*-> °;A$(I): NEXT 

350 POR I = ! T0 4: PRINT “DOMANDA N . ";1 :“: (RISPOSTA* °;C 

»(!);•)": PRINT QMI): NEXT 
360 POME - 16368,0: P0KE 34,23: HOME 
370 PRINT : INVERSE : PRINT * CAMBIO: «DISPOSTA <DDOMANDA 
(RTN) OR “: NQRMAL 
380 INPUT ‘SCEGLI: ":Yi* 

390 IF LEFT$ (Yi$,l) = °R" THEN GOSUB 480 

400 IF LEFTJ (Yif.l) = "D* THEN GOSUB 550 

410 IF Yl$ = 00 THÉN TEXT ; GOTO 440 
420 PRIN 7 CHRi (7); 

430 GOTO 330 

440 RN = RN * 3: HCME : PRIMI "SALVA QUESTO GRUPPO DI D0MAN 
DE:" 

450 GOSUB 1150 
460 GOSUB 1180 
470 REUIRN 
480 REM 

490 PQKE - 16368.0 

500 HCME : INPUT ^CAMBIO RISPOSTA N.°;Y$ 

510 IF Y$ = THEN RETURN 

520 IF 'VAL (Yl) < 1 OR 'VAL (Y$> > 4 THEN PRINT CHR* (7) 

: GOTO 500 

530 HOME : PRINT "NUOVA RISPOSTA N.":Y*;V: INPUT "":A$( V 
Al (Y$)):A$( ‘VAL (Y$)> = LEFTf mi VAL (Y$)),35) 

540 RETURN 
550 REM 
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5òU D OKt " i6368.0 

570 HOME : INPIE *CAMBIO DOMANDA N. fl ;Y* 

580 IF Y* = 7HEN RETURN 

590 IF UAL (Y«) < ! OR UAL (Y*) > 4 THEN PRINT CHI» (7) 

. Q0TO 570 

600 HO^E ' : PRIMI 'NUOUA DOMANDA N. B ;Y*: 8 : B : INPUT 88 :Q*( ‘UÀ 
L <Y*)):Q*( UAL (Y*)> = LEFT* (»( UAL (Y*)).15?) 

610 INPUT E NUOUA RISPOSTA CORRETTA =■;»< UAL <Y*J) 

620 IF ‘UAL (C*< UAL <Y*)>) < 1 OR UAL (C*( 'UAL <Y$») > 4 
THEN PRINT CHI» (7): GOTO 610 
630 RETURN 
640 REM 

650 HOME : PRINT “SCRIUI IL NUMERO DEL RECORD DA RIUEDERE: 8 
660 INPUT BB ;Y$ 

670 IF ‘UAL \W < 0 THEN Y* = B 0 a 

680 IF UAL <Y$) > RN THEN Y$ = STR* (RN) 

690 IF Y* = 88 THEN Y* = B 0 B 
700 J = UAL (Y$): FOR I = J TO RN 
710 RI = 1 : 60SUB 1210 
720 IF RN = - 1 THEN 820 

730 HOME : INVERSE : HTA6 15: PRINT “RECORD N, B ;I; NORMAL 
7 40 PRINT : FOR K = 1 TO 4 : PRINT K;”-> D ;A*(K): NEXT 

750 PRINT : FOR K = ! TO 4: PRINT COMANDA N. B ;Kj B (RISPO 

STA = H ;C$(K);") n 
760 PRINT QÌ(K): NEXT 

770 PRINT : INPUT B UUOI CORREGGERE? «X»PER USCIRE): B :Y* 

780 IF Y* = a X H THEN TT = RN:RN = I: GOSUB 1150::RN = TT: R 

ETURN 

790 IF LEFT* (Y*,!) < ) B S B THEN 820 

800 GOSUB 840 

810 GOTO 730 

S20 NEXT 

830 RETURN 

840 REM 

850 PQKE - 16368.0: POKE 34.21: HOME 
860 PRINT : INVERSE : PRINT 1 CAMBIO: DISPOSTA <D>0MANDA 
<RTN) OK 2 : NORMAL 
870 INPUT 'SCEGLI : n :Yl* 

880 IF LEFT* <Y!*,1) = B R C THEN GOSUB 480 

890 IF LEFT* <Y1*,1) = R D“ THEN GOSUB 550 

900 If Yl* = 88 THtN TEXT : GOTO 1010 
910 PRINT CHI» (7); 

920 TEXT 

930 HOME : 1MUERSE : HTAB 15: PRINT “RECORD N . 8 ;I : NORMAL 
940 PRINT : POR K = 1 TO 4: PRINT K; B -> B ;A$(K): NEXT 

950 PRINT : FOR K = 1 TO 4: PRINT “DOMANDA N. 9 ;K; 3 (RISPO 

STA = 3 :C$<K)j') 3 
960 PRINT D$(K): NEXT 

970 PRINT : INPUT “UUOI CORREGGERE? «X>PER USCIRE): 9 ;Y* 

980 IF LEFT* ili A) = “X“ THET4 RETURN 
990 IF LEFT* (Y*,l) < ) B S B THEN 1010 
1000 GOTO 840 

1010 HCfiE : PRINT B SALUA QUESTO GRUPPO DOMANDA: 8 
1020 TT = RN : Rf\ ! = I: GOSUB 1150.-RN = TT 
1030 RETURN 

1040 REM INDEX ERROR TRAP 

1050 ER = PEEK (222): IF ER < 22 THEN PRINT DGS* 8 CLOSE° 

1060 IF ER < > 5 T HEf4 1320 

1070 PRINT CHI» (7): PRINT CHI» (7) 

1080 HOME : PRINT “NON CI SONO DOMANDE SALUATE SUL DISCO 5 : 

PRINT “PER FAVORE, DAI UN NOME AL FILE : s 
1090 PRINT : INPUT aB ;Y*:Y* = LEFT* <Y*.38) 

1100 RN = - 1: PRINT'DOS*; 8 OPEN TRIUIA.INDEX 0 : PRINT DOS*; 
'URITE TRIUIA.INDEX” : PRINT Y*: PRINT RN: PRINT DOS*; 3 
CLQSE TRIUIA.INDEX' 

1110 GOTO 110 
1120 REM 

1130 PRINT DOS*; 8 OPEN TRIUIA.INDEX 8 : PRINT DOS*; a READ TRIUI 

(continua) 


nel listato 2 e lo si salvi su dischetto con 
il comando: 


SAVE TRIVIA 


Quando lo si fa girare per la prima 
volta TRIVIA.FILER crea automati¬ 
camente due file di dati denominati 
TRIVIA.INDEX e TRIVIA.QUES. 
Questi due file saranno già presenti sul 
dischetto, per i lettori che lo richiede¬ 
ranno al Disk Service, che potranno 
così iniziare subito a giocare. Coloro 
invece che preferiscono digitare i lista¬ 
ti, dopo aver provveduto a introdurre 
con attenzione e a salvare su dischetto 
il programma del listato 1 , battano 
RUN TRIVIA.FILER per introdurre 
nuove domande o per fare il lavoro di 
manutenzione del file. 

Le linee 110 e 1040-1120 determi¬ 
nano se su questo dischetto sono già 
state introdotte domande in preceden¬ 
za. In caso negativo sarà attivata una 
trappola d’errore quando la linea 1130 
cercherà di leggere dati sul dischetto. 
Il computer invita poi a introdurre un 
nome di identificazione dei dati da sal¬ 
vare su questo dischetto. Queste infor¬ 
mazioni, insieme con il valore dell’ul¬ 
timo record introdotto, vengono sal¬ 
vate nel file di testo TRIVIA.INDEX. 

Il menù principale offre tre scelte: 
inserire un gruppo di domande (quat¬ 
tro domande e quattro risposte), scri¬ 
vere un gruppo di domande, o finire il 
programma. 

Si scelga l’opzione 1 per immettere 
un gruppo di domande. La linea 240 
controlla il numero di record più alto e 
stampa un messaggio se il file è stato 
completamente riempito. Ogni di¬ 
schetto ha spazio-per 100 record (nu¬ 
merati da 0 a 99) che contengono quat¬ 
tro domande e quattro risposte salvate 
nel file di testo TRIVIA.QUES. La 
lunghezza massima per ciascuna rispo¬ 
sta è di 35 caratteri, e la lunghezza 
massima per ogni domanda è di 159 
caratteri. 

Si introdurrà dapprima un gruppo di 
risposte, e poi le domande corrispon¬ 
denti (linee 270-350). Per ogni do¬ 
manda il giocatore indicherà la rispo¬ 
sta giusta, e non è necessario che alla 
domanda 2 corrisponda la risposta 2: si 
può essere disordinati e fantasiosi. Si 
possono introdurre le domande in 
qualunque ordine, e due o più doman¬ 
de possono avere la stessa risposta. 

Si deve tener conto dei bordi dello 
schermo quando si immettono le do¬ 
mande. Dato che l’Apple ha uno 
schermo di 40 caratteri, la quarantesi¬ 
ma lettera di una domanda verrà stam- 
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A.INDEX': INPUT SU: INPUT RN: PR1NT DOS*;'CL0SE TRIVI 
A. INDEX' 

1140 RETURN 
1150 REM 

1160 PRINT DOS*:"OPEN TR1VIA.8UES,L800': PRINT DOS*j'URJTE 
TRIVIA.QUES.R':RN: FOR K = 1 TO 4: PRINT A*(K): NEXT 
FOR K = 1 TO 4: PRINT G*(K): NEXT : FOR K = 1 TO 4: 
R1NT C*(K): NEXT : PRINT DOS*;"CLOSE TRIV1A.QUES" 

1170 RETURN 
1180 REM 

1190 PRINT DOS*;'OPEN TRIVIA.INDEX': PRINT DOSIj'URITE TRIp 
1A.INDEX': PRINT SU: PRINT RN: PRINT DOS*;'UOSE TRIV 
1A.INDEX” 

1200 RETURN 
1210 REM 

1220 IF RN = - 1 THEN HOME : PRINT ‘MESSINA DOMANDA SUL D 
ISCO.': PRINT : PRINT "(RETURN) PER CONTINUARE:'; : INP 
UT " ;Yf ; RETURN 

1230 PRINT DOS*:"OPEN TR1VIA.QUES.L800': PRINT D0S*;'READ T 
RIVIA.QUES R"'RI 

1240 FOR K = 1 lo ì: INPUT A*(K): NEXT : FOR K = 1 TO 4: IN 

PUT »<K): NEXT : FOR K = 1 TO 4: INPUT CIAO: NEXT 

1250 PRINT DOS*:"CLOSE TRIVIA.QUES': RETURN 
1260 REM ROUTINE ERRORI 

1270 ER = PEEK (222): IF ER ( 22 THEN PRINT DOSVCLOSE' 
1280 IF ER = 4 THEN PRINT 'DISK URITE PROTECTED": GOTO 133 

n 

1290 IF ER = 8 THEN PRINT "DISK I/O ERROR": GOTO 1330 

1300 IF ER = 9 THEN PRIt4T "DISK FULL 0 : GOTO 1330 

1310 IF ER = 10 THEN PRINT "FILE LOCKED": GOTO 3330 
1320 PRINT "ERRORE N.";ER" ALLA LINEA fl ; PEEK (218) ♦ PEEK 
(219) * 25 6 

1330 PRINT : PRINT "(RETURN) PER RIPARTIRE": GET K%i PRINT 
: GOTO 110 


pata nell’ultima posizione di stampa 
sull’orlo destro dello schermo, e la 
quarantunesima sarà stampata sull’or¬ 
lo sinistro dello schermo una riga sot¬ 
to. Se si pensa che l’orlo dello schermo 
possa spezzare una parola si usi la bar¬ 
ra spaziatrice per far avanzare il curso¬ 
re fino alla riga seguente. Non si pre¬ 
ma RETURN prima di aver compieta- 
mente introdotto la domanda. 

Per ciascun gruppo si avrà occasione 
di editare qualsiasi risposta o doman¬ 
da prima di salvare (linee 370-630). 
Per cambiare una risposta o una do¬ 
manda, o per andare avanti, si prema 
rispettivamente il tasto R (risposta), il 
tasto D (domanda) o RETURN. Si 
dovrà reintrodurre soltanto la doman¬ 
da o risposta sbagliata. Se si preme 
RETURN verranno salvati i dati come 
sono presentati sullo schermo. Prima 
di salvare è meglio controllare ogni 
voce per assicurarsi che non ci siano 
errori di ortografia e parole spezzate 
in modo inopportuno. 

Per editare informazioni introdotte 
in precedenza si scelga sul menù prin¬ 
cipale l’opzione 2. L’opzione delle li¬ 
nee 650-690 permette di esplorare ed 
esaminare in successione ogni record, 
partendo dal record 0 (basta premere 


RETURN>) o da qualsiasi altro nu¬ 
mero di record. 

Le linee 700-1030 svolgono la vera 
e propria funzione di scansione e di 
editing. L’editing è fatto nella stessa 
maniera in cui viene fatto durante la 
routine di immissione delle domande. 

Un’ultima osservazione per i pro- 
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Listato 2 



grammatori; le linee 1130-1150 leg¬ 
gono sul dischetto la label del file delle 
domande e il numero massimo di re¬ 
cord; le linee 1160—1180 immettono le 
informazioni contenute in un record 
nell’ambito del file TRIVIA.QUES 
(prima tutte le risposte, poi tutte le 
domande, poi tutte le risposte giuste, 
nell’ordine); le linee 1190—1210 scri¬ 
vono i dati correnti su dischetto; e le 
linee 1220-1260 salvano su dischetto 
il record della domanda scelta. Nelle 
linee 1260-1330 è inclusa una trappo¬ 
la d’errore del dischetto. 


Come funziona TRIVI A 



Quando viene fatto girare il pro¬ 
gramma TRIVIA la linea 110 immette 
la label assegnata al file delle domande 
su questo dischetto e l’ultimo numero 




1 REM ********************** 

2 REM * TRIVIA * 

3 REM * DI SCOTT JACKSON * 

4 REM * (0 1985 BY * 

5 REM * APPLICANDO * * 

6 REM * M1CR0SPARC, INC. * 

7 REM ********************** 

100 HOME :D0S$ = CHR$ (4): ONERR GOTO 1390 

110 FI = "TRIVIA.INDEX': PRINT DOS*:'OPEN*:FI: PRINT DOSI;' 

READ';Ff : INPUT SN*: INPUT RN: PRINT DÒSIj'CLOSE";F$ 

120 IF RN < 1 THEN ER = 5: GOTO 1400 
130 DIM CFK<RN,3> 

140 G0SUB 590: VTAB 20: PRINT '<0 1985 BY APPLICANDO 4 MIC 
R0SPARC. INC': VTAB 17: HTAB 16: PRINT "ISTRUZIONI’ 1 ;: 
INPUT '*:Y$ 

150- IF LEFT* (Y*,l) < > 'S* THEN 170 

160 G0SUB 910 

170 HOME 

180 TT = 0 

190 VTAB 20: INVERSE 

200 HTAB 8: PRINT 'TEMPO';: HTAB 28: PRINT 'PUNTI' 

210 HTAB 8: PRINT ■-HTAB 28: PRINT '-' 

220 HTAB 8: PRINT ' HTAB 28: PRINT ' 

230 N0RMAL 

240 F0R QN = 1 T0 7 

250 P0KE 34,7: P0KE 35,16: VTAB 7: HOME : P0KE 34,0: P0KE 3 
5 23 

260 INVERSE 
270 ‘VTAB 6: PRINT ■ 

'; : REM =>40 SPACES 
280 VTAB 17: PRINT ' 

':: REM =>40 SPACES 
290 NORMAL 
300 G0SUB 810 

310 VTAB 4: HTAB 15: PRINT 'DOMANDA N.'jQN 

320 VTAB 22: HTAB 8: INVERSE : PRINT ■ 100 ';: N08MAL 

330 F0R I = 1 T0 3000: NEXT I 

340 P0KE - 16368.0 

350 VTAB 8: HTAB 1: PRINT 0*<Q2 ♦ 1) 

360 VTAB 12: F0R I = 1 T0 4: PRINT ' ':I;*. ';A*(I): NEXT 
370 TM = 100: F0R I = 0 T0 100: IF PEEK ( - 16384) > 127 T 
HEN 440 

380 NEXT 1 : GOTO 420 

390 P0KE - 16368,0: G0SUB 690 

400 G0SUB 690 

410 IF TM = 0 THEN 460 

420 IF PEEK ( - 16384) > 127 THEN 440 

430 GOTO 390 

440 iF PEEK < - 16384) = A *176 THEN 500 
450 P0KE - 16368,0 

460 F0R I = 1 T0 45:8UZZ = PEEK < - 16336) - PEEK ( - 163 
36): NEXT 

470 TM = TM - 25: IF TM < 0 THEN TM = 0 
480 IF TM ) =1 THEN 400 

490 INVERSE : HTAB 8: VTAB 22: PRINT ' 0 ':: NORMAL 

500 VTAB <11 + A): HTAB 5: INVERSE : PRINT A*(A) 

510 G0SUB 550 . 

520 NORMAL : F0R I = 1 TO 2000: NEXT 1 
530 NEXT QN 
540 GOTO 1040 

550 REM «< PUNTI »> ( 

560 TT = TT ♦ TM 

570 VTAB 22: HTAB <32 - LEN < STRI (TT))): PRINT TT 
580 RETURN 

590 REM <« LOGO ») 

600 HOME (continua) 
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di record salvato. Se sul dischetto sono 
stati memorizzati meno di due gruppi 
di domande una trappola d’errore ci 
informerà della necessità di far girare 
prima TRIVIA.FILER. 

TRIVIA personalizzato 

Diverse linee del programma posso¬ 
no essere cambiate se si vuol persona¬ 
lizzare TRIVIA per le proprie applica¬ 
zioni. 

Linea 240: QN è il contatore del 
numero di domande da fare per ogni 
partita. Se questo numero viene cam¬ 
biato (linea 240) si badi a modificare le 
linee 1080—1140 in modo che corri¬ 
spondano ai nuovi livelli di punteggio, 
e a cambiare la linea 970 delle istruzio¬ 
ni di gioco. 

Linea 330: il valore dell’indice di 
loop controlla il tempo d’attesa che 
trascorre prima che sia presentata una 
domanda. 

Linea 370: TM è il valore di parten¬ 
za per l’orologio. 

Linea 470: La penalità attribuita per 
una risposta sbagliata è fissata a 25. 

Linea 520: Viene fissato nell’indice 
di loop il tempo d’attesa che precede 
una vecchia domanda e la formulazio¬ 
ne di una nuova. 

Linea 780: Viene fissato nell’indice 
di loop l’intervallo di tempo fra i tic 
dell’orologio. 

Linee 820-840: Questa routine sce¬ 
glie a caso una domanda. Per prima 
cosa controlla se una domanda scelta a 
caso sia stata già fatta in precedenza, e 
se necessario fa una nuova scelta. Q1 
sceglie il numero di record per un 
gruppo di domande, e Q2 sceglie la 
domanda che verrà fatta. Se il numero 
dei tentativi di risposta eguaglia il nu¬ 
mero delle domande possibili il pro¬ 
gramma fa una diramazione alla routi¬ 
ne di linea 1430 per trovare eventuali 
domande non utilizzate. Se non ne 
vengono trovate viene offerta al gioca¬ 
tore la scelta fra abbandonare e rico¬ 
minciare il gioco. 

Linee 850-890: questa routine cari¬ 
ca ciascuna domanda. 

Linee 1070-1140: Vengono asse¬ 
gnati a N$ i valori corrispondenti a 
differenti livelli d’intelligenza. I valori 
o le loro qualificazioni possono essere 
modificati (naturalmente nei limiti del 
buon gusto). 

r-- T 

Questo programma è disponibile su di¬ 
schetto e contiene già 400 domande 
memorizzate. L’elenco, i prezzi e le mo¬ 
dalità d’ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. . 

-* 


<510 INVERSE 

620 VTAB 6; HTAB 10: PRINT ■ ';: REM => 

21 SPACES 

630 VTAB 10: HTAB 10: PRINT ■ REM = 

>21 3PACES 

640 VTAB 6: FOR I = 6 TO 10: HTAB 10: PRINT “ ": NEXT I 

650 VTAB 6: FOR ! = 6 TO 10: HTAB 31: PRINT » > : NEXT I 

660 NGRMAL 

670 VTAB 8: HTAB 18: PRINT 'TRIVIA' 1 
680 RETURN 

690 REM «< TEMPO »> 

700 INVERSE : VTAB 22: HTAB 9: PRINT " 

710 TM = TM - 1 

720 VTAB 22: IF TM < 10 THEN HTAB 11 
730 IF TM < 100 AND TM > 9 THEN HTAB 10 

740 IF TM = 100 THEN HTAB 9 

750 IF TM < 0 THEN TM = 0 
760 PRINT TM; 

770 FOR I = 0 T0 1:S = PEEK < - 16336): NEXT 

780 FOR I = 1 T0 175: NEXT 

790 NORMAL 
800 RETURN 

810 REM <« SELEZIONA DOMANDE »> 

320 Q! = INT < RN0 (1) * (RN + 1)):Q2 = INT ( RND <15 * 4 
> 

830 IF 00(01.82) = 1 THEN RC = RC + 1:: 0N RC ) RN GOTO 14 
30: S0T0 320 
840 00(81,82) = 1 
850 PRINT : Fi = 'TRIVIA.QUES’ 

860 PRINT D0S4;*0PEN'F*' L800': PRINT DOS*j'READ'F*',R';Q1 
870 FOR I = 1 T0 4: INPUT AKI): NEXT : FOR I = 1 T0 4: INP 
UT 0*<I): NEXT : FOR I = 1 T0 4: INPUT CK1): NEXT 
880 PRINT DOSK'CIOSE'F* 

890 A = VAL (CKQ2 ♦ 1» 

900 RETURN 

910 REM «< ISTRUZIONI »> 

920 HOME 

930 A* = 'IL COMPUTER PORRÀ' UN CERTO NUMERO DI DOMANDE.' 

940 B* = 'PREMI IL TASTO APPROPRIATO PER INDICARE LA RISP0S 
TA GIUSTA (NON PREMERE RETURN) 

950 C* = 'OGNI DOMANDA HA UN 'VALORE DI 100 PUNTI, MENTRE 0G 
NI ERRORE VERRÀ' PENALIZZATO DI 25 PUNTI." 

960 B* = "IL TEMPO E' IMPORTANTE, RISPONDETE VEL0CEMEN 
TE. MA CORRETTAMENTE.' 

970 E* = "AVRETE SETTE DOMANDE." 

980 0* = A*: G0SUB 1000:0* = Bl: G0SUB 1000:0* = C*: G0SUB 
1000:0* = D*: G0SUB 1000:0* = E*: G0SUB 1000 
990 PRINT "PREMI (RETURN) PER CONTINUARE:';: INPUT ' ';Y*: 
HOME : RETURN 

1000 FOR ! = 1 T0 LEN (0*5 

1010 PRINT MIO* <8*, 1,1):: IF MID* (01,1,1) < > ' ' THEN 
G0SUB 1030 

1020 NEXT 1: PRINT : PRINT : PRINT : FOR J = 1 T0 150: NEXT 
J: RETURN 

1030 FOR K = 0 T0 !:S = PEEK < - 16336): NEXT K: FOR J = 1 
TO 20: NEXT J: RETURN 
1040 REM <« FINE »> 

1050 REM CANCELLA TEMPO E PUNTEGGIO 

1060 'VTAB 12 

1070 N* = "ILLETTERATO" 

1080 JF 77 > 399 THEN N* = “SVANTAGG1AT0" 

1090 IF TT > 449 T HEN N* = "SOTTO LA MEDIA" 

1100 IF TT > 499 THEN N* = 'OLIASI INTELLIGENTE' 

1110 IF TT > 549 THEN NI = 'INTELLIGENTE' 

3120 IF TT > 599 THEN NI = 'MOLTO INTELLIGENTE' 

1130 IF TT > 649 THEN N* = "BRILLANTE" 

1140 IF TT > 674 THEN N* = 'GENIO! il' 

1150 P0KE 35.18: VTAB 1: HOME 
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i160 INVERSE : VTAB 22: HTA8 3: FRINÌ " *: NORMAL : POK 

E 35,23 

1170 FLASfi : VTAB 22: HTAB 29: PRINT TT ; : NORMAL 
1!8C VTA8 7: HTAB 1 

1190 Ai = "IL TUO PUNTEGGIO EQUIVALE AL LIVELLO’:6$ = "DI I 
NIELLIGENZA :” 

1200 FOR ! = 3 TO LEN (Ai): PRINT NID» (Ai.1,1):: IF MIO 
i (Ai.1,1) = " " THEN 1220 
1210 FOR K =0 TO 1:S = PEEK ( - 16336): NEXT K 

1220 FOR J = 0 TO 20: NEXT J 

1230 NEXT I 

1240 PRINT : PRINT : FOR 1 = 1 TO LEN (Bi): PRINT MIO* (B 
$.1,1);: IF HIDi (Bi.1,1) = * * THEN 1260 
1250 FOR K = 0 TO 1:S = PEEk ( - 16336): NEXT K 

1260 FOR J = 0 TO 20: NEXT J 

1270 NEXT I 

1280 FOR 1 = 0 TO 500: NEXT 1: INVERSE 

1290 FOR I = 1 TO LEN <N$): PRINT MIDi (Ni,1,1);: IF MIO 

$ (Ni,1,1) = ’ * THEN 1310 

1300 FOR K = 0 TO 10:S = PEEK ( - 16336) - PEEK ( - 16336 
): NEXT K 

1310 FOR J = 0 TO 20: NEXT J 
1320 NEXT I 

1330 NORMAL : POKE - 16368,0 
1340 FOR I = 0 TO 500: NEXT! 

1350 HTAB 1: VTAB 13: INPUT "VUOI RIPROVARE 9 ';Y$ 

1360 IF LEFTi (Yi,l) ( ) ’N* THEN 170 
1370 TEXT : CALE - 936: VTAB 22: END 
1380 REM ROUTINE ERRORI 

1390 ER = PEEK (222): HOME : VTAB 12: IF ER < 22 THEN PR! 
NT CHRi (4)'CLOSE’ 

1400 IF ER = 5 T HEN PRINT 'DEVI USARE 'TRIV1A.F1LER' PER C 
REARE": PRINT "DUE GRUPPI DI DOMANDE PRIMA DI ": P 
RINT ‘GIOCARE A TRIVIA'*: END 

1410 PRINT ‘ERRORE N. "ER” ALLA RISA" PEEK (218) + PEEK (2 
19) * 256: END 

1420 REM ROUTINE DOMANDE INUTILIZZATE 

1430 Gl = - 1 

1440 FOR J1 = 0 TO RN 

1450 FOR J2 = 0 TO 3 

1460 IF CHX(J!,J2) ( > 1 THEN 81 = J!:Q2 = J2:J! = RN:J2 = 
3 

1470 NEXT 
1480 NEXT 

1490 IF Q! ( > - ! THEN RC = 0: GOTO 840 
1500 HOME : VTAB 12: POKE - 16368,0: PRINT "TUTTEVRN + 1) 
* 4" DOMANDE SENO STATE POSTE.": PRINT "VUOI RIDONINO 
IARE 0 FINIRE 9 (R/F)";: GET K$: IF K$ = "R" THEN PRIN 
T : RUM 



mEmoR informatica srl 

y.T ogliatti 4 56030 Perigliano Pi 

DISTRIBUISCE ALL INGROSSO 
IN TUTTA ITALIA 


materiali pronti a magazzino 


Macintosh ... e 

tanto software in italiono o prezzi 
unici e irripetibili. 

Apple // 

Per* i fer i che . . 

Schede aggiuntive ... 
Compat i b i I i <made in italy> 
alcuni esempi : 

compatibile Ile 635.000 

disk-drive slim sokata 325.000 
doppio drive "duodisk” 865.000 
mouse completo 199.000 

stampante 80 col. I .V. 830.000 

super serial cord e cavo 135.000 
doppio controller cord 66.000 
porollel card standard 66.000 
scheda 80 coi.+ 64 k 166.000 
scheda Z-80 x CP/M 79.000 
languoqe card 16 k 76.000 

Hord-disk 5 mb. 1.990.000 
Tutto con garanzia un anno 


Consegno immediato ovunq ue 

SOFT VARE x fipple 
A prezzi estremamente bassi sono 
disponibili oltre 150 pakage di alto 
affidabilità, tutti in sorgente, con 
allegato il manuale completo d’uso. 


FLOPPV-DiSK 

Tutta la gamma Verbatim 
<verex e datalife) offerti 
a prezzi imba11ibiIi anche 
per piccoli quantitativi 


listino completo e dettagliato può’ 
essere richiesto inviando 3.000 
lire in francobolli oppure ordinando 
almeno un orticolo in contrassegno 

Per dettagli tecnici urgenti : 
TELEFONARE alle 0587 - 616084 


MATERIALI FORNITI CON 
GARANZIA 

SODDISFATTI 0 RIMBORSATI 

con noi i tuoi investimenti 
saranno sempre più protetti. 

I prezzi non comprendono I* i.v.a. 
Apple. Duodisk, Macintosh. sono 
marchi di opple computer ine. 
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Computer Center apre Genova all'informatica 

con il suo primo Computer Shop 



Computer Center guida Genova neU'informatica 

con i suoi ComputerShops 


Apple a Genova é 


flÉcippkz computer 



ViaSYincenzo 107-109r. tei.010/581474 Genova 
Via Storace 4 r. tel.010/454107 Ge.$ampierdarena 
Via S.Vincenzo I29r. te 1.010/ 581815 Genova 
Corso Gastaldi 77r. tel.010/300797 Genova 
C.soB.Aires 125 tel.0185/314142 Lavagna 


















C’erano una volta le macchine da scrivere, gli errori di 
battitura, le gomme per cancellare, i prodotti chimici per 
nascondere... ma, in genere, osi ribatteva un testo più 
volte, finché il risultato non diventava accettabile, o si 
chiudevano gli occhi. Oggi, invece... 


Lettere impeccabili 


P uò sembrare strano che, dopo an¬ 
ni ormai dall’avvento del perso¬ 
nal computer, Applicando si occupi di 
un problema ormai superato da tem¬ 
po. In realtà, il nostro scopo non è di 
far conoscere le possibilità dell’Apple 
nel campo del word processor, quanto 
quello di aiutare a utilizzare al meglio 
uno dei programmi più completi in 
questo campo. Purtroppo i manuali 
non sono sempre chiari: scritti da tec¬ 
nici esperti, a volte trascurano aspetti 
che all’utilizzatore alle prime armi 
possono sembrare, sul momento, osti¬ 
ci e complicati. 

Lettera tipo 

Prendiamo, per esempio, una sem¬ 
plice lettera e costruiamola insieme 
passo passo: il risultato sarà impecca¬ 
bile e, soprattutto, facilmente rag¬ 
giungibile anche da chi accende per la 
prima volta il computer. 

Per prima cosa bisogna scegliere 
l’opzione word processor del Tre per 
te, poi "ex novo" e dare un nome al file. 
Chiamiamolo lettera. Impostiamo la 
tabulazione (figura 1), premendo me¬ 
la vuota T. Il cursore si sposta nella 
riga in alto formata da 4 segni di ugua¬ 
le e un punto esclamativo, ripetuti per 
tutto lo schermo. Dove c’è il punto 
esclamativo, lì si ferma il cursore 
quando premiamo il tabulatore, ov¬ 
viamente quando siamo nel modo 
scrittura. 

Schiacciamo A per annulla, e la riga 
in alto diventa tutta di segni uguali: 
significa che non esiste più tabulazio¬ 
ne. Spostiamo il cursore, usando la 
freccia destra, attorno al sessantesimo 


File: app1icando 


MODIFICA TABULAZIONI 


Esc: Rev/Agg/Modi i ica 


Figura 1. 


Tabulazioni: M: Mette T: Toglie A: Annulla 


(Colonna 1) 


File: applicando wp 


MODIFICA TABULAZIONI Esc: Rev/Agg/Modifica 


Figura 2. 


Tabulazioni: M: Mette T: Toglie A: Annulla 


(Colonna 45) 


File: applicando wp 


OPZIONI DI STAMPA 


Esc : Elimina Val ore 


-Proporz i onal e-1 


Figura 3. 



LC=8,0 MS=1,0 

MD= 1 

,0 PI NG AC= 

12,0 

MA=0,0 MB=2,0 

Parametro: pi 

NG: 

; .on Giusti*. 

IG: 

Inizio Gruppo 



CN: 

Centrato 

FG: 

Fine Gruppo 

LC: 

Larghezza Carta 

AC: 

Altezza Carta 

TE: 

Testata 

MS: 

Margine Sinist. 

MA: 

Margine Alto 

NO: 

Nota piè pag. 

MD: 

Margine Destro 

MB: 

Margine Basso 

SR: 

Salta Riga 

CP: 

Car./Poi lice 

LP: 

Linee/Pollice 

NP: 

Numero Pagina 

PI : 

Proporzionale-1 

1S: 

Spazio Singolo 

PO: 

Pausa Ogni pag. 

P2 : 

Proporzionale-2 

2S : 

Spazio Doppio 

PQ: 

Pausa Qui 

RI : 

Rientranza 

3S : 

Spazio Triplo 

FM: 

Fissa Marcatore 

Gl : 

Giustificato 

PN: 

Pagina Nuova 

IN: 

Inizio Neretto 


FN: 
I ♦ : 
F+ : 
I - : 
F- : 
IS: 
FS: 
SP: 
IT: 


Fine Neretto 
Inizio Apice 
Fine Apice 
Inizio Pedi ce 
Fine Pedice 
Inizio Sottolin 
Fine Sottolin 
Stampa n. Pag. 
Intr. Tastiera 
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File: appiicando wp 


REV/AGG/MODIFICA 


Esc : Menù Base 


-Proporz i onal e-1 
-Giustificato 

-Margine Alto: 2,0 Pollici 


Figura 4. 


Batti un valore o usa i comandi § Riga 3 Colonna 1 §-? per Aiuto 


File: applicando wp 


REV/AGG/MODIFICA 


Esc: Menù Base 


-Proporz i onal e-1 
■Giustificato 


Gentile Signor 
Aldo Rossi 
Via Mi 1 ano 12 
00100 Roma (RM) 


Figura 5. 


Batti un valore o usa i comandi § Riga 7 Colonna 45 


§-? per Aiuto 


File: app1icando wp 


REV/AGG/MODIFI CA 


Esc: Menù 8ase 


■Proporz i onal e-1 
•Gi ust i f i cato 


Gentile Signor 
Aldo Rossi 
Via Mi 1 ano 12 
00100 Roma (RM^ 


Figura 6. 


-Margine Sinist.: 1,5 Pollici 
-Margine Destro: 1,5 Pollici 


Batti un valore o usa i comandi § Riga 12 Colonna 40 §-? per Aiuto 


File: applicando wp OPZIONI DI STAMPA Esc: Elimina Valore 


-Margine Sinist.: 1,5 Pollici 

-Margine Destro: 1,5 Pollici 

Gentile Signor Rossi, 

siamo a rammentarle la scadenza della sua polizza vita 


LC=8,0 MS=1,5 MD=1,5 PI Gl AC=12,0 MA=0,0 MB=2,0 LP=Ó 1S 

Parametro: IN NG: Non Giustif. IG: Inizio Gruppo FN: Fine Neretto 

CN: Centrato FG: Fine Gruppo I+: Inizio Apice 

LC: Larghezza Carta AC: Altezza Carta TE: Testata F+: Fine Apice 

MS: Margine Sinist. MA: Margine Alto NO: Nota piè pag. I-: Inizio Pedice 

;L> : Margine Destro MB: Margine Basso SR : Salta Riga F-: Fine Pedice 

CP: Car./Pollice LP: Linee/Pollice NP: Numero Pagina IS: Inizio Sottolin 

PI: Proporzionale-1 1S: Spazio Singolo PO: Pausa Ogni pag. FS: Fine Sottolin 

P2: Peoporzionale-2 2S: Spazio Doppio PQ: Pausa Qui SP: Stampa n. Pag. 

RI: Rientranza 3S: Spazio Triplo FM: Fissa Marcatore IT: Intr. Tastiera 

Gl: Giustificato PN: Pagina Nuova IN: Inizio Neretto 


Figura 7. 


segno di uguale, e premiamo M (figu¬ 
ra 2). In questo modo abbiamo impo¬ 
stato la tabulazione per scrivere nome 
e indirizzo della persona alla quale 
stiamo scrivendo, affinché siano cor¬ 
rettamente posizionati in corrispon¬ 
denza della finestra trasparente della 
busta. 

Impostazione 
del carattere 

Poiché AppleWorks permette di 
scegliere fra vari tipi di carattere, im¬ 
postiamo ora quello che preferiamo. 
Per una lettera, l’ideale è il Proporzio¬ 
nale 1, che permette di compattare 
molto bene il testo, è molto leggibile e 
non occupa troppo spazio (nel senso 
che è un carattere "piccolo"). 

Per fare questo, basta premere mela 
vuota P per entrare nelle opzioni di 
stampa, battere pi (p minuscola o ma¬ 
iuscola: è lo stesso), Return e infine 
Escape per tornare nel modo inseri¬ 
mento testo. Lo schermo vi si presenta 
come in figura 3. Sempre al fine di 
dare un aspetto elegante alla lettera, 
chiediamo che le righe vengano "giu¬ 
stificate", cioè allineate perfettamente 
anche a destra, seguendo sempre la 
procedura descritta prima: mela vuota 
P, Gl e Return. Non battete però 
Escape, perché dobbiamo ancora defi¬ 
nire un altro parametro. Sicuramente 
infatti la vostra carta da lettere avrà 
un’intestazione, in alto, perciò sarà 
bene definire un margine entro il qua¬ 
le non bisogna scrivere. Per esempio il 
margine può essere di 2 pollici. Batte¬ 
te allora MA per margine alto, Re¬ 
turn, 2,0, Return e infine Escape: vi 
ritroverete come nella figura 4. 

Per prima cosa va scritto Pindirizzo; 
premete il tasto tabulatore: il cursore 
si posizionerà automaticamente alla 
sessantesima battuta, dove avevamo 
fissato la tabulazione. Scrivete l’inte¬ 
stazione (Gentile Signor), battete Re¬ 
turn, ancora il tasto di tabulazione, il 
nome, ecc., come visibile in figura 5. 

Ora si tratta di fissare i margini sini¬ 
stro e destro della lettera. Natural¬ 
mente dipende dalla larghezza della 
vostra carta da lettere, ma in genere 
margini di 1,5 pollici dovrebbero esse¬ 
re l’ideale. Procedete come al solito 
premendo mela vuota P, poi MS, Re¬ 
turn, 1,5, Return, MD, Return, 1,5, 
Return, Escape: il risultato è quello 
della figura 6. 

A volte, all’interno di uno scritto, vi 
sono parole o frasi che si desidera evi¬ 
denziare. Con il word processor del 
Tre per te è possibile stampare in ne- 
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retto o sottolineato. Per esempio, nel¬ 
la lettera che stiamo "costruendo", si fa 
riferimento a una polizza scaduta e si 
cita il numero di polizza. Proprio que¬ 
st’ultimo lo vogliamo evidenziare in 
neretto. Prima di scrivere la parola n. 
1.000, entriamo nel modo Parametri, 
premendo mela vuota P e battiamo IN 
(per inizio neretto), Return. Un segno 
di cappelletto sta a indicare che da 
quel momento in avanti tutto ciò che 
scriveremo sarà in nero (figura 7). 

Per annullare il comando e ripren¬ 
dere a scrivere normalmente, basta 
entrare ancora una volta nel modo Pa¬ 
rametri, battere FN (per fine neretto), 
Return e Escape. Anche qui lo stesso 
segno di cappelletto sta a indicare che 
d’ora in poi si riprende a scrivere nor¬ 
malmente (figura 8). 

Per la sottolineatura, il procedimen¬ 
to è uguale, fatta naturalmente ecce¬ 
zione per le sigle da battere, rispettiva¬ 
mente IS, per Inizio Sottolineatura, e 
FS, per fine sottolineatura (figure 9 e 
10 ). 

Siamo arrivati alla firma, che è bene 
mettere centrata in fondo al foglio. 
Premete mela vuota P, CN, Return, 
Escape (figura 11). Tutte le righe che 
scriverete dopo questo comando ver¬ 
ranno centrate. 

Stampa 

Ora non resta che stampare la lette¬ 
ra con l’opzione mela vuota S. Ma, 
come si può vedere dalla figura 12, 
nome e indirizzo non compaiono nella 
posizione corretta, come invece li ve¬ 
devamo a video. Infatti il carattere 
proporzionale, compattando gli spazi, 
non permette un corretto posiziona¬ 
mento di brevi righe singole col tabu¬ 
latore. Non c’è comunque motivo di 
preoccuparsi, basta seguire l’accorgi¬ 
mento seguente: cancellate l’indiriz¬ 
zo, posizionate il cursore nella riga in 
cui riscriverete l’indirizzo, premete 
mela vuota P, impostate il margine si¬ 
nistro premendo 5,0, Return e 
Escape. In questo modo ogni riga che 
scriverete inizia 5 pollici dal bordo si¬ 
nistro. 

Se non avete familiarità con i pollici 
(un pollice corrisponde a 2,54 centi- 
metri) , procuratevi un righello che su 
un lato riporti le misure in centimetri e 
sul lato opposto in pollici: vi verrà utile 
in molte occasioni. 

Scrivete ora il vostro indirizzo, sen¬ 
za premere il tasto di tabulazione, ma 
ricordando di impostare il margine de¬ 
stro 1,5 dopo aver scritto l’indirizzo, 
altrimenti tutta la lettera risulterà alli¬ 
neata con l’indirizzo. Ristampate la 


File: applicando wp 


Esc : 

E' imina Va’ ; 


1,5 Pollici 


Figura 8. 

-Margine Destro: 

1,5 Pollici 



Gentile Signor Rossi 




siamo a rammentarle 

la scadenza della sua polizza vita 

*n. 

1 .000* 



LC=8,0 MS=1,5 

MD= 

1,5 PI Gl AC= 

12,0 

MA=0,0 MB=2,0 LP= 

=6 IS 

Parametro: FN 

NG: 

Non Giustif . 

IG: 

Inizio Gruppo FN: 

Fine Neretto 



CN: 

Centrato 

FG: 

Fine Gruppo I+: 

Inizio Apice 

LC: 

Larghezza Carta 

AC: 

Altezza Carta 

TE: 

Testata F+: 

Fine Apice 

MS: 

Margine Sinist. 

MA: 

Margine Alto 

NO: 

Nota piè pag. I-: 

Inizio Pedice 

MD: 

Margine Destro 

MB: 

Margine Basso 

SR: 

Sa 1ta Riga F-: 

Fine Pedice 

CP: 

Car ../Poi lice 

LP: 

Linee/Po1 lice 

NP: 

Numero Pagina IS: 

Inizio Sottolin 

PI : 

Proporzionale-1 

1S: 

Spazio Singolo 

PO: 

Pausa Ogni pag. FS: 

Fine Sottolin 

P2 : 

Proporzional e-2 

2S : 

Spazio Doppio 

PQ: 

Pausa Qui SP: 

Stampa n. Pag. 

RI : 

Ri entranza 

3S : 

Spazio Triplo 

FM: 

Fissa Marcatore IT: 

Intr . Tastiera 

Gl : 

Giustificato 

PN: 

Pagina Nuova 

IN: 

Inizio Neretto 



File: applicando wp 

OPZIONI 

DI STAMPA 

Esc : 

Elimina Va 1 ore 


-Marg i ne Sin i st . 

: 1,5 Pollici 



Figura 9. 



1.5 Pollici 




Gentile Signor Rossi, 





siamo a rammentarle la 

scadenza della 

sua poi izza vita *n . 

1 .OOC 

1 * » per 

un i 

mporto complessivo 

d i * 





LC=8,0 MS=1,5 MD= 

1,5 PI Gl AD 

=12,0 MA=0,0 MB=2,0 

LP= 

■6 IS 

Parametro: IS NG: 

Non Giustif. 

IG: Inizio Gruppo 

FN: 

Fine Neretto 


CN: 

Centrato 

FG: Fine Gruppo 

1 + : 

Inizio Apice 

LC: 

Larghezza Carta AC: 

Altezza Carta 

TE : Testata 

F+ : 

Fine Apice 

MS: 

Margine Sinist. MA: 

Mangi ne Alto 

NO: Nota piè pag. 

I - : 

Inizio Pedi ce 

MD: 

Margine Destro MB: 

Margine Basso 

SR: Salta Riga 

F- : 

Fine Pedice 

CP: 

Car./Poi lice LP: 

Linee/Poi 1 ice 

NP: Numero Pagina 

IS: 

Inizio Sottolin 

PI : 

Proporziona1e-1 IS: 

Spazio Singolo 

PO: Pausa Ogni pag. 

FS: 

Fine Sottolin 

P2 : 

Proporzionale-2 2S: 

Spazio Doppio 

PQ: Pausa Qui 

SP: 

Stampa n. Pag. 

RI : 

Rientranza 3S: 

Spazio Triplo 

FM: Fissa Marcatore 

IT: 

Intr. Tastiera 

Gl : 

Giustificato PN: 

Pagina Nuova 

IN : Inizio Neretto 



File: applicando wp 

OPZIONI 

DI STAMPA 

Esc : 

Elimina Val ore 


- Mangi ne Sinist. 

: 1,5 Pollici 



Figura 10. 


- Margine Destro: 

1,5 Pollici 




Gentile Signor Rossi, 





siamo a rammentarle la 

scadenza della 

sua poi izza vita * n. 

1.000*, per 

un i 

mporto complessivo 

di *233.000 (duecentotrentatremi1 al i 

r e ) * . 



LC=8,0 MS=1,5 MD= 

1,5 PI Gl AD 

=12,0 MA=0,0 MB=2,0 

LP= 

-6 IS 

Parametro: FN NG: 

Non Giusti f . 

IG: Inizio Gruppo 

FN: 

Fine Neretto 


CN: 

Centrato 

FG: Fine Gruppo 

1+ : 

Inizio Apice 

LC: 

Larghezza Carta AC: 

Altezza Car ta 

TE: Testata 

F+ : 

Fine Apice 

MS: 

Margine Sinist. MA : 

Mangi ne Alto 

NO: Nota piè pag. 

I - : 

Inizio Pedice 

MD: 

Margine Destro MB: 

Margine Basso 

SR : Salta Riga 

F- : 

Fine Pedice 

CP: 

Car./Poi lice LP: 

Linee/Pollice 

NP: Numero Pagina 

IS: 

Inizio Sottolin 

PI : 

Proporzionale-1 IS: 

Spazio Singolo 

PO: Pausa Ogni pag. 

FS: 

Fine Sottolin 

P2 : 

Proporzionale-2 2S: 

Spazio Doppio 

PQ: Pausa Qui 

SP: 

Stampa n. Pag. 

RI : 

Rientranza 3S: 

Spazio Triplo 

FM: Fissa Marcatore 

IT: 

Intr. Tastiera 

Gl : 

Giustificato PN: 

Pagina Nuova 

IN: Inizio Neretto 



File: applicando wp 

OPZIONI 

DI STAMPA 

Esc : 

Elimina Val ore 


Restiamo in attesa del suo versamento e siamo a sua completa 
disposizione per qualunque chiarimento o i nf ormaz i one che volesse 
richiederci . 


Distinti saiuti. Figurali. 

-Centrato 



LC=8,0 MS=1,5 

MD=1,5 PI CN AC= 

12,0 

MA=0,0 MB=2,0 

LP= 

=6 IS 

Parametro: CN 

NG: Non Giustif. 

IG: 

Inizio Gruppo 

FN: 

Fine 

Neretto 



CN: Centrato 

FG: 

Fine Gruppo 

1 + : 

I n i z 

io Apice 

LC: 

Larghezza Carta 

AC: Altezza Carta 

TE: 

Testata 

F+ : 

Fine 

Apice 

MS: 

Margine Sinist. 

MA: Mangi ne Alto 

NO: 

Nota piè pag. 

I - : 

I n i z 

io Pedice 

MD: 

Mangi ne Destro 

MB: Margine Basso 

SR: 

Saita Riga 

F- : 

Fine 

Pedi ce 

CP: 

Car./Poi 1 ice 

LP: Linee/Pollice 

NP: 

Numero Pagina 

IS: 

I n i z 

io Sottolin 

PI : 

Proporzionale-1 

1S: Spazio Singolo 

PO: 

Pausa Ogni pag. 

FS: 

Fine 

Sot tol in 

P2 : 

Proporzionale-2 

2S: Spazio Doppio 

PQ: 

Pausa Qui 

SP: 

Stampa n. Pag . 

RI : 

Rientranza 

3S: Spazio Triplo 

FM: 

Fissa Marcatore 

IT: 

Intr. 

. Tastiera 

Gl : 

Giustificato 

PN: Pagina Nuova 

IN: 

Inizio Neretto 
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lettera e questa volta il risultato, im¬ 
peccabile, deve essere quello della 

figlia 13. 

Lettere personalizzate 

Spesso si ha l’esigenza di scrivere la 
stessa lettera a più persone. Con l’op¬ 
zione di stampa del Tre per te si posso¬ 
no fare fino a 9 copie della stessa lette¬ 
rata, in questo caso, il testo è uguale 
per tutti. Se invece si desidera perso¬ 
nalizzare uno scritto, c’è un trucco ab¬ 
bastanza semplice. 

Impostate la lettera fino all’indiriz- 
zo escluso; quest’ultimo infatti deve 
essere cambiato per ogni singola lette¬ 
ra, se questa è destinata a più persone. 
Posizionate il cursore nella prima riga, 
dove appunto dovreste cominciare a 
scrivere l’indirizzo, premete mela vuo¬ 
ta P, IT, Return, Escape. Ma non scri¬ 
vete l’indirizzo. Nel modo scrittura 
battete tre Return per lasciare quel 
giusto spazio tra l’indirizzo e 1’inizio 
del testo. 

Ricordate che ora dovete impostare 
il margine sinistro a 1,5 pollici, per 
annulare l’impostazione a 5,0 pollici 
fatta in precedenza per l’indirizzo. 

Scrivete Gentile Signor , battete uno 
spazio ed entrate ancora nel modo Pa¬ 
rametri, impostando nuovamente 
l’opzione IT, ma non scrivete il nome. 

Andate avanti a scrivere la lettera 
fino al sucessivo riferimento da perso¬ 
nalizzare (il numero della polizza, nel 
nostro esempio), impostate ancora IT. 
Proseguite la lettera fino alla cifra da 
versare. Impostate anche in questo ca¬ 
so IT. 

Al momento di stampare, in tutti i 
punti in cui avete inserito IT, il compu¬ 
ter interromperà la stampa e voi potre¬ 
te inserire per mezzo della tastiera tut- 


Figura 12 Gentile Signor 

Aldo Rossi 
Via Milano 12 
00100 Roma (RM) 


Gentile Signor Rossi» 

siamo a rammentarle la scadenza della sua polizza vita n. 1.000» per un 
importo complessivo di 233.000 (duecentotrentatremilalire) . Per sua 
comodità le alleghiamo un bollettino di versamento in conto corrente 
postale già precompilato. Se invece desidera provvedere al pagamento 
tramite assegno, la nronhiamo di l'importo 

Assicurazioni v '’ 


Figura 13 Gentile Signor 

Aldo Rossi 
Via Milano 12 
00100 Roma (RM) 


Gentile Signor Rossi, 

siamo a rammentarle la scadenza della sua polizza vita n. 1.000, per un 
importo complessivo di 233.000 (duecentotrentatremilalire) . Per sua 
comodità le alleghiamo un bollettino di versamento in conto corrente 
postale già precompilato. Se invece desidera provvedere al pagamento 
tramite assegno, la preghiamo di intestarlo per l'importo sopraddetto a 
Assicurazioni Vita spa» con l'avvertenza di voler emettere l'assegno NON 
TRASFERIBILE. 

Cogliamo inoltre l'occasione per proporle una nuovissima polizza infortuni 
che» come potrà vedere dall'allegata documentazione, prevede alcune 
clausole davvero innovative in questo campo. 

Restiamo in attesa del suo versamento e siamo a sua completa disposizione 
per qualunque chiarimento o in-formazione che volesse richiederci. 

Distinti saluti. 

Mano Negri 


Noi 

Tutto e- s F/Nitó/ 

Ti RESTITUISCO il 


FLCPPf CON 



to il testo che vorrete: l’indirizzo, il 
nome della persona dopo Gentile Si¬ 
gnor, il numero della polizza, l’impor¬ 
to da versare. 

Un accorgimento: poiché abbiamo 
scelto come carattere di stampa il pro¬ 
porzionale giustificato, se inseriamo 
parole di testo a metà stampa di una 
riga, il risultato finale può non essere 
perfetto. Allora, al momento di stam¬ 
pare, scegliete che il vostro testo, anzi¬ 
ché su stampante, venga stampato a 
video, fate i vostri inserimenti, e solo 
alla fine stampatelo con la stampante. 

Ricordate anche di salvare lettera 
per lettera con un nome diverso, per 
evitare di "scrivere sopra" al file di par¬ 
tenza non personalizzato, il che vi co¬ 
stringerebbe a rifare tutto il lavoro 
dall’inizio. 


26 












SUPER 

LIBRI 






Programmazione umanizzata in Apple¬ 
soft. Riassume tutte le tecniche che ven¬ 
gono comunemente impiegate dagli 
esperti di software per rendere più ami¬ 
chevoli i programmi e per superare i 
limiti umani degli utenti. Vengono infatti 
affrontati tutti gli aspetti di queste tecni¬ 
che, come routine a prova d’errore e la 
documentazione e i manuali operativi. Il 
libro include due completi programmi: 
un quiz mnemonico e un’agenda telefo¬ 
nica elettronica. 208 pagine, 21.000 li¬ 
re. 


Grafica e animazione con gli Apple //. 

Questo libro vuole guidare gli appassio¬ 
nati nella complessa materia della grafi¬ 
ca e dell’animazione, prendendoli per 
mano dai primi rudimenti fino a una 
completa comprensione della computer 
graphics. Gli esempi sono applicati alla 
famigla degli Apple //: Il Plus, //e e /le. 
Particolare attenzione è dedicata a: figu¬ 
re ad alta risoluzione, uso di HPLOT, 
rotazione, figure piane, vettori, solidi, 
animazione. 160 pagine, 17.000 lire. 


Il Basic Applesoft. Un corso completo 
di programmazione in Applesoft, uno 
dei più diffusi dialetti del Basic, adottato 
dalla famiglia degli Apple. Il corso è arti¬ 
colato in 16 capitoli che affrontano tutti 
gli aspetti del linguaggio con un metodo 
graduale che non presuppone alcuna 
conoscenza di base. Tra gli argomenti 
trattati: uso interattivo del computer, 
sintassi dei comandi DOS, formattazio¬ 
ne dell’input e dell’output, array, grafica 
a bassa e ad alta risoluzione, comandi e 
funzioni Applesoft. 232 pagine, 19.000 



PER MACINTOSH 





Guida al Macintosh. Fin dal primo ap¬ 
proccio, il Mac è molto amichevole, e 
offre sul video una scelta tra varie opzio¬ 
ni, rappresentate da icone. In questo 
modo l’utente può scegliere una o più di 
queste funzioni potendo tranquillamente 
ignorare ciò che avviene all'Interno della 
macchina e superando così la naturale 
diffidenza che a volte i computer ispira¬ 
no. Lo strumento fondamentale per 
questo rapporto amichevole con il Mac è 
il mouse, che in moltissime applicazioni 
rende superflua la tastiera. Questo volu¬ 
me introduce l’utente del Mac o il poten¬ 
ziale acquirente alla filosofia di questa 
macchina. 224 pagine, 22.000 lire. 



Il manuale MC68000. La famiglia di 
questo microprocessore trova un utiliz¬ 
zo vastissimo in workstation, sistemi 
CAD/CAM, sistemi di commutazione te¬ 
lematici, robot e controllori di processo, 
oltre che nei micrdcomputer di recente 
realizzazione, come Macintosh, Sinclai- 
re QL, HP 9816. Questo manuale tratta 
in dettaglio le caratteristiche fisiche dei 
vari dispositivi, le temporizzazioni di si¬ 
stema, la logica di processo, la gestione 
della memoria, ecc. ed è una preziosa 
fonte di informazione per gli appassio¬ 
nati di programmazione in Assembler o 
di progetti hardware. 168 pagine, 
16.000 lire. 



Come usare MacWrite e MacPaint. 

Molto più di quanto facciano i manuali 
operativi allegati ai programmi, questo 
volume svela ogni trucco dei due appli¬ 
cativi per Macintosh, spiegando ed 
esemplificando particolari tecniche di 
disegno e di gestione dei testi, sempre 
nell’ottica di un uso integrato dei due 
programmi, per ottenere il meglio da 
essi. Il libro è riccamente illustrato con 
immagini prodotte seguendo fedelmen¬ 
te i consigli del testo, così da offrire ai 
lettori il risultato grafico di ogni sequen¬ 
za di operazioni. 192 pagine, 20.000 
lire. 


Compilare e spedire il tagliando qui sotto a Applicando , Editronica Srl., Corso Monforte 39, 20122 Milano 
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^ Ci sono momenti in cui il //e, con tutti quei suoi bip, sembra »os 3.3 jjjj 

< 0 ^ ridere dei nostri errori. Che fare? Spegnerlo e uscire a fare S S 5 //» in 

due passi? Cambiarlo con il //c, che ha il volume regolabile? APPLE//c 
Mettersi i tappi nelle orecchie? No, la soluzione è un’altra, 
semplice e davvero simpatica... e soprattutto funziona! 


Se non sopporti il bip 



C on la sua voce un po’ stridula e un 
tono che tradisce una certa soddi¬ 
sfazione, il computer commenta con 
un bip il vostro errore. È implacabile, 
instancabile, monotono e ossessivo: 
riesce a emettere migliaia di bip sem¬ 
pre uguali senza smettere, senza fer¬ 
marsi, senza rendersi conto che ormai 
l’avete capito, di aver sbagliato qual¬ 


cosa. Anzi, lui che vi conosce bene 
dovrebbe avere il buon gusto di sapere 
che fino a quando non troverete il per¬ 
ché dell’errore sarete un po’ elettrici e 
suscettibili; forse vorreste da parte sua 
un amichevole silenzio, un po’ di tacita 
comprensione, magari addirittura una 
muta complicità... Non sperateci. Lui 
sa essere crudele, e soprattutto vuole 
avere l’ultima parola: bip. 

Quel prudorino omicida che a que¬ 
sto punto vi sentite nelle mani è nor¬ 
male, non allarmatevi: tutti, prima o 
poi, hanno provato il desiderio di fra¬ 
cassare il computer, per punire la sua 
voglia di far lo spiritoso. Il bip, sulle 
prime, non infastidisce più di tanto; è 
quando lo si è udito troppe volte che 
può diventare decisamente irritante. 
Se non lo sopportate più, però, non 
disperatevi: per rendere più piacevole 
la vita del programmatore è possibile 
modificare, con un "personalizzatore 
di bip" il suono incriminato. 

Con questo programma in Apple¬ 
soft, che gira in DOS 3.3, si realizza 
infatti una routine di suono persona- 
lizzata in linguaggio macchina. Ogni 
volta che si incontra un carattere 


CTRL G verrà emesso un suono "su 
misura" in luogo del solito suono di 
campanello. 

Come usare 
il programma 

Quando si fa girare il BIP PERSO¬ 
NALIZZATO vengono visualizzate 
le impostazioni correnti del bip, insie¬ 
me a un menù di quattro voci, come 
illustrato nella figura 1. Se si introduce 
una A il programma chiederà la lun¬ 
ghezza e il suono che si desiderano per 
il bip. Se volete usare il valore attuale 
non avete che da premere RETURN. 
Il programma accetterà soltanto valori 
da 1 a 255 compresi. 

Premendo B sentirete il bip definito 
dalla lunghezza e dal suono indicati in 
quel momento sullo schermo; se non 
sentite nulla, controllate l’istruzione 
DATA a linea 670, oppure alzate un 
po’ il suono. Minore è il valore del 
suono, maggiore è la sua altezza. 

Se premete C, il computer vi invite¬ 
rà a indicare in quale locazione va 
messa in memoria la routine del bip; il 
valore di default è 768 (buono a saper¬ 
si se si è incerti): basta premere RE¬ 
TURN per accettarlo. Salvate allora il 
linguaggio macchina sul vostro di¬ 
schetto e mettete anch’esso in memo¬ 
ria. 

Introducendo D avrete la stessa co¬ 
sa, ma il programma in linguaggio 
macchina non verrà salvato sul di¬ 
schetto. Per uscire dal programma 
senza far nulla potete premere ESC. 
Potete attivare il campanello premen¬ 
do CTRL G, e da adesso riceverete un 
"7SYNTAX ERROR" più gradevole. 

Una volta che avete salvato sul di¬ 
schetto il codice in linguaggio macchi¬ 
na per il nuovo bip potete battere sem¬ 
plicemente BRUN APPLE.BIP per 
mettere il bip in memoria. Poi siete 
pronti per partire. Se un RESET disat- 


Figura 1 

*************************************** 

* BIP PERSONALIZZATO DI JOHN BAUMBACH * 

* <C> 1985 BY APPLICANDO & MICROSPARC * 
*************************************** 

LUNGHEZZA ATTUALE: 64 
SUONO ATTUALE: 16 


<A> MODIFICARE IL BIP ATTUALE 
<B> SENTIRE IL BIP ATTUALE 
<C> SALDARE IL BIP ATTUALE/FINE 
(D) FINE 
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Listato 1 


10 REM ********************** 

20 REM * BIP PERSONALIZZATO * 

30 REM * DI JOW BALNBACH * 

40 REM * COPYRIGHT (0 1985 * 

50 REM * BY APPLICANDO & * 

60 REM * MICROSPARC, INC * 

70 REM ********************** 

80 DIM A<36) 

90 TEXT : HOME 

100 FOR L = 1 TO 39:A$ = A* + "*": NEXT L 
110 PRINT A$ 

120 PRINT "* BIP PERSONALIZ2AT0 DI JOft4 BAUMBACH *" 

130 PRINT "* (0 1985 BY APPLICANDO & MICROSPARC *" 

140 PRINT A$ 

150 PRINT 
160 POKE 34,7 

170 REM LEGGE A.L. IN "A" 

180 FOR L = 1 TO 36: READ A(L): NEXT 

190 VTAB 6: HTAB 1 : CALL - 958: PRINT "LUNGHEZZA ATTUALE: 

":: INVERSE : PRINT A<19): NORMAL 
200 PRINT "SUONO ATTUALE: INVERSE : PRINT A<21)s NO 

RMAL 

210 PRINT : PRINT : PRINT : PRINT "(A) MODIFICARE IL BIP AT 
TUALE" 

220 PRINT "(B) SENTIRE IL BIP ATTUALE" 

230 PRINT "(C) SALVARE IL BIP ATTUALE/FINE" 

240 PRINT "(D) FINE" 

250 PRINT : PRINT "INTRODUCI GET R$ 

260 IF R* = "A" THEN 330 

270 1F R$ = "B" THEN 440 

280 IF R* = "D" THEN 520 

290 IF R$ = ’C" THEN 490 

300 IF R$ = CHR* (27) THET4 PRINT CHR* (92): PRINT : GOTO 
680 

310 GOTO 190 

320 REM MODIFICA IL BIP 

330 PRINT : PRINT : PRINT "(RETURN) PER ACCETTARE VALORE AT 
TUALE; INTRODUCI (0-255)": PRINT 
340 INPUT "INTRODUCI NUOVA LLM6HEZZA =) ";LNGTH*: IF LNGTH* 
= "" THEN LNGTH* = STR* (A(19)> 

350 IF VAL (LNGTH*) < = 0 THEN 340 


360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 


500 

510 

520 

530 

540 

550 

560 


570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

670 


680 


IF VAL (LNGTH*) ) 255 THEN 340 
INPUT "INTRODUCI IL NUOVO SUONO => ";TNE*: IF TNE* = "" 
THEN TNE* = STR* (A(2D) 

IF VAL (TNE*) < = 0 THEN 370 
IF VAL (TNE*) > 255 THEN 370 
Ad9) = VAL (LN6TH*) 

A(21) = VAL <TNE*) 

GOTO 190 

REM EMETTE IL BIP 

PRINT : PRINT "ASCOLTA.... " 

FOR L = 1 TO 100: NEXT 
REM "CALL 750" BIP TEMPORANEO 
FOR L = 750 TO 767: POKE L.A(L - 734): NEXT : CALL 750: 
FOR L = 1 TO 300: NEXT : GOTO 190 
REM SALVA IL BIP 

HOME : PRINT : PRINT "SALVA BIP ATTUALE:": PRINT : GOSU 
B 560: PRINT : PRINT CHR* (4);"BSAVE APPLE.BIP,A";LCT; 
* L37" 

PI^INT : PRINT "BIP SALVATO SU DISCHETTO": PRINT : GOTO 
530 

GOTO 190 

HOME : PRINT "FINE PROGRAfflA: 1 : PRINT : GOSUB 560 
PRIN^ : PRINT "BIP INSTALLATO.": CALL LCT: GOTO 680 
REM METTE BIP IN MEMORIA 
REM ALLA LOCAZIONE "LCT" 

PRINT : INPUT "INTRODUCI LA LOCAZIONE DI MEMORIA ALLA 
QUALE SALVARE LA ROUTINE CHE MODIFICA IL BIP (DEFA 
ULT=768) —=>";LCT* 

IF LCT* = "" THEN LCT = 768: GOTO 590 
LCT = VAL (LCT*) 

PRINT : PRINT "LA LOCAZIONE E'' ":LCT: PRINT 

LCT = LCT ^ 11:8= LCT - 1NT (LCT / 256) * 256:HI = I 

NT (LCT /- 256) :A(2) = 8:A(6) = HI 

LCT = LCT - 11 

X = 0 

FOR L = LCT TO LCT 4 35 
X = X 4 1 
POKE L,A(X): NEXT 
RETURN 

DATA 169,11,133,54,169,3,133,55.76.234 - 3,201,135.208.1 
8,152,72,160,64,169,16.32,168,252,1/3,48,192,136,208,24 
5,104,168.96,76,240,253 
TEXT : END 


tiverà il bip personalizzato, potrete ri¬ 
pristinarlo con una CALL al vostro 
indirizzo di partenza (il default è 
CALL 768). 

Come introdurre 
il programma 

Per digitare il programma introdu¬ 
cete il listato 1 e salvatelo su dischetto 
con il comando: 


SAVE BIP PERSONALIZZATO 

Non c’è bisogno di introdurre il co¬ 
dice visibile nel listato 2, in quanto il 
BIP PERSONALIZZATO genererà 
automaticamente il codice in linguag¬ 
gio macchina e lo salverà con il nome 
di APPLE.BIP. 

Descrizione 
del programma 

La prima linea del programma è 
un’istruzione DIM (linea 80), che DI- 


Mensiona la matrice A per il program¬ 
ma in linguaggio assemblatore. Poi il 
programma predispone la pagina del 
titolo nelle linee 100-140 e carica i 
dati per il programma in linguaggio 
assemblatore nella matrice A (linea 
180), che è stata previamente definita 
a linea 80. Le Linee 190-200 visualiz¬ 
zano lunghezza e suono correnti. La 
variabile A (19) contiene la lunghezza 
(che comincia come 64), e il suono 
(che comincia come 16) è contenuto 
nella variabile A (21). I numeri 64 e 16 
sono stati scelti ad arbitrio per definire 
il bip. 

Le linee 210-240 visualizzano il 
menù e chiedono di fare una scelta. Su 
quello che fa ciascuna scelta tornere¬ 
mo più avanti. 

La parte del programma che modifi¬ 
ca il bip (linee 330-410) chiede all’u¬ 
tente una nuova lunghezza e un nuovo 
suono per il bip. Quando la nuova lun¬ 
ghezza viene introdotta sostituisce la 
vecchia lunghezza nella variabile A 
(19), e il nuovo suono sostituisce il 
vecchio suono nella variabile A (21). 

La parte seguente del programma 
(linee 440-470) emette il bip. Il pro¬ 
gramma separato in linguaggio mac¬ 


china (listato 2) emette il bip vero e 
proprio che, poiché al momento non 
c’è per lui un posto permanente, viene 
ospitato in un luogo "sicuro", in loca¬ 
zione decimale da 750 a 767. (Questa 
locazione è sicura per ora, ma sarà 
presto sovrascritta da altre cose.) Il 
programma in linguaggio macchina, 
dal canto suo, è stato letto in prece¬ 
denza nella variabile A (linea 180) e 
viene ora scritto con POKE nella me¬ 
moria. 

La linea 490 salva il programma in 
linguaggio assemblatore su dischetto 
con il nome di APPLE.BIP. Richiama 
dapprima una routine di locazione che 
si trova a linea 560, salva l’APPLE- 
.BIP e poi esce a linea 530. Anche le 
linee 520-530 richiamano la stessa 
routine, e poi fanno finire il program¬ 
ma, dopo aver attivato la routine in 
linguaggio macchina. 

Vediamo adesso la routine di loca¬ 
zione. La cosa si fa un po’ complicata. 
A linea 560 la routine riceve dapprima 
la locazione di partenza in memoria 
per la routine di bip in linguaggio mac¬ 
china. Di solito per le routine brevi in 
linguaggio macchina si usa la locazio¬ 
ne 768, dato che ciò causa pochissimi 
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Listato 2 


SOURCE FILE; 
0000 : 

0000 
0000 
0000 
0000 
0000 
0000 


APPLE.B1P 

1 ********************** 

2 * APPLE BIP * 

3 * BY J0W BAUMBACH * 

4 * COPYRIGHT (0 1985 * 

5 * BY APPLICANDO 4 * 

6 * MICR0SPARC, INC. * 

7 ********************** 


0300: 

8 

0RG 

$300 

0036: 

9 CSWL 

EQU 

$36 

0037: 

10 CSWH 

EQU 

$37 

03EA: 

11 RECQN 

EQU 

$3EA 

0087: 

12 CTRLG 

EQU 

$87 

CO 30: 

13 SPKR 

EQU 

$C03G 

FCA8: 

14 WAIT 

EQU 

$FCA8 

FDFO: 

15 COLITI 

EQU 

$FDF0 

0300: 

16 * 



0300:A9 OB 

17 BPIN1T 

LDA 

£BEEP 

0302:85 36 

18 

STA 

CSWL 

0304:A9 03 

19 

LDA 

£<BEEP 

0306:85 37 

20 

STA 

CSWH 

0308: 

21 * 



0308:40 EA 03 

22 

JMP 

RECQN 

030B: 

23 * 



0308:09 87 

24 BEEP 

CMP 

£CTRLG 

030D:DQ 12 

25 

ONE 

N0RM 

030F:98 

26 

TYA 


0310:48 

27 

PHA 


0312:A0 40 

28 

LDY 

£$40 

0313:A9 10 

29 BPL00P 

LDA 

£$10 

0315:20 A8 FC 

30 

JSR 

WAIT 

0318:AD 30 CO 

31 

LDA 

SPKR 

0318:88 

32 

DEY 


031C:D0 F5 

33 

BNE 

8PL00P 

031E:68 

34 

PLA 


031F:A8 

35 

TAY 


0320:60 

36 

RTS 


0321:4C F0 FD 

37 N0RM 

JMP 

CGUT1 

0324: 

38 * 




. OBJO 


;REINDIR1ZZA VETTORE USCITA CARATTERE 
;PER LA ROUTINE DI BIP 


; RI COLLEGA VETTORE DOS 

:1L CARATTERE RICEVUTO E' STAMPATO 
;SE DIVERSO DA CRTL-G 
; SALVA IL REGISTRO Y NELLO STACK 

{LUNGHEZZA DEL T0T40 
{FREQUENZA DEL TONO 

,SUONO ALTOPARLANTE 
; RI STABILIZZA IL REGISTRO Y 


{USCITA CARATTERE 


*** SUCCESSFUL ASSEM8LY: NO ERRORS 


problemi, e quindi è questo il valore di 
default (linea 570). Poi la locazione 
scelta viene visuaizzata sullo schermo 
(linea 590). La formula che si trova 
nelle linee 600-610 modifica un poco 
il programma in linguaggio macchina 
regolando i puntatori. Infine nelle li¬ 
nee 620-650 l’intero programma in 
linguaggio macchina viene scritto con 
POKE in memoria nella locazione fi¬ 
nale e la linea 660 ritrasferisce il con¬ 
trollo del programma dalla routine di 
locazione alla routine principale di 
chiamata. 

Da ultimo si vede nell’istruzione 
DATA (linea 670) il programma in 
linguaggio macchina nella sua forma 
in Basic Applesoft. 

IL listato 2 mostra un programma 
APPLE.BIP esemplificativo generato 
dal BIP PERSONALIZZATO. Que¬ 
sta versione specifica un indirizzo di 
partenza 768, suono 16 e lunghezza 64. 
Il vero e proprio programma di bip 
comincia a $30B; il codice a $300 cam¬ 
bia il collegamento di output del DOS 
3.3 (CSWL, CSWH) in modo che pun¬ 
ti alla routine di bip. 


In seguito ogni carattere prima di 
essere emesso è controllato dall’istru¬ 
zione CMP £$87 a $30B. Se il carattere 
nel registro A è un <CTRL-G> vie¬ 
ne eseguito il resto della routine di bip. 
Altrimenti viene fatta una diramazio¬ 
ne a $324 e il carattere viene emesso 
normalmente. 

La routine di bip impiega due routi¬ 
ne incorporate nell’Applesoft per pro¬ 
durre un suono: una produce un ritar¬ 
do, sulla base del contenuto dell’accu¬ 
mulatore, l’altra produce un click del¬ 
l’altoparlante. Il contenuto di Y, o il 
valore specificato dall’utente per la 
lunghezza del suono nel BIP PERSO¬ 
NALIZZATO, determina quanti 
click dell’altoparlante si debbano pro¬ 
durre, mentre il contenuto di A, forni¬ 
to come frequenza del suono nel BIP 
PERSONALIZZATO, determina 
l’entità deH’intervallo fra i click. 


Questo programma è disponibile su 
dischetto. L’elenco, i prezzi e le 
modalità d’ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 

¥ 
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-Sei proprio sicuro che il tuo computer ^ 

sia sempre al sicuro? 

Siete certi di aver messo al riparo il vostro computer dai più comuni rischi 
e incidenti che possono capitargli? Rispondete sinceramente 
a queste 7 domande, sia che abbiate già sottoscritto una polizza assicurativa, 

sia che ancora non l'abbiate fatto. 



Sempre più compatti e proprio per questo 
sempre più portatili (si pensi all'Apple //c), i 
personal si trasportano da casa all'ufficio, e 
viceversa, con estrema facilità. E se durante il 
tragitto si da un incidente? Pagate voi? aSìaNo 




Andate al mare, in montagna, a casa di un 
amico e vi fermate lungo il tragitto per una 
commissione, un ladro vi ruba il computer dal 
portabagagli. Pagate voi?a Sìa No 



Partite per una vacanza e decidete di portare 
con voi il vostro personal. Andate in 
albergo, in una casa in affitto o nella villa 
di vostro fratello, e succede qualcosa al vostro 
computer. Pagate voi? a sì □ No 




Siete nel bel mezzo di un 'applicazione 
complicata. Non volete interrompervi ma 
nemmeno rinunciare a un whisky on thè rocks 
o al caffè. Ahimè, il liquido finisce sulla 
tastiera mandando in cortocircuito il 
computer. Pagate voi? a sì a No 



Vostro figlio si avvicina al computer senza 
essere visto e comincia a picchiarci sopra con 
un oggetto più duro del vostro computer. 
Pagate voi? a sì a no 




Se qualche vostro amico o una vostra 
impiegata si fa male maneggiando il vostro 
personal, pagate voi? a sì a No 


RISPOSTE 

7 No. Il vostro computer è davvero al sicu¬ 
ro. Bravi. 

6 No e 1 Sì. Valutate bene se II caso In cui 
avete risposto si ha scarse possibilità di 
verificarsi. Potrebbe valere la pena di ri¬ 
schiare e di lasciare le cose come stanno. 
Da 2 a 7 Sì. Affrettatevi a leggere il box qui 
sotto, perché il vostro computer non è 
affatto al sicuro, il che potrebbe causarvi 
un sacco di fastidi e farvi perdere un muc¬ 
chio di soldi. 


e applicando 

vi mettono al sicuro 

Sicuramente sarete convinti che esista già da tempo una 
polizza per assicurare il personal computer Non è cosi 
Finora tutte le compagnie di assicurazione hanno creato 
polizze nate per garantire i grossi centri di eladorazlone 
dati e solo in seguito hanno adattato queste polizze alle 
esigenze di coloro che vogliono assicurare il proprio perso 
nai Ma una polizza adattata non può certo paragonarsi a 
una polizza nata apposta per soddisfare le esigenze del 
possessore di un personal computer Applicando, in colla¬ 
borazione con la Ras una delle piu importanti compagnie di 
assicurazioni italiane ha studiato a fondo il problema E 
nata così la Polizza Applicando la prima e. per il momento 
unica assicurazione che copra tutti l rischi relativi al posses¬ 
so e all'uso di un personal e delle sue periferiche (stampan¬ 
ti drive, video,ecc) Applicando è orgogliosa di presentarla 
in anteprima ai suol lettori e di offrire loro la possibilità di 
sottoscriverla nella maniera più semplice Basta leggere 
attentamente le condizioni pubblicate alla pagina seguen¬ 
te compilare il tagliando e spedirlo a Editronica srl. Polizza 
Applicando Corso Monforte 39 20122 Milano Avrete così 
risolto per sempre, tutti i vostri problemi 





































Condizioni generali di assicurazione. 


1) Premessa 

a) l'adesione alla presente polizza è riservata ai proprie¬ 
tari di un Personal Computer il cui valore stabilito 
come alla Condizione 6) sia superiore a L. 2.500.000 
IVA compresa; 

b) l’adesione alla presente polizza da parte dei proprie¬ 
tari di personal Computer avverrà a mezzo invio di 
apposita cartolina con il relativo importo di premio; 

c) l'intestatario della cartolina sarà considerato a tutti gli 
effetti come l’Assicurato; 

d) la garanzia sarà operante dalle ore 24 del giorno di 
spedizione della cartolina, risultante dal timbro posta¬ 
le La copertura avrà durata un anno, sempreché la 
data di inizio della garanzia sia compresa nel periodo 
di validità della convenzione; 

GARANZIE PRESTATE E CONDIZIONI DI 
ASSICURAZIONE 

2) Sez. I - Danni materiali 

Derivanti da; 

a) incendio, opera di spegnimento e salvataggio, fulmi¬ 
ne, esplosione, scoppio, implosione; 

b) acqua e liquidi in genere, inondazione, alluvione, 
trombe, uragani, gelo, ghiaccio, neve, grandine, va¬ 
langa, caduta di massi e altri simili eventi; 

c) superamento del muro del suono, caduta di aeromo¬ 
bili o cose da essi trasportate; 

d) corto circuito, variazione di corrente, sovratensione 
arco voltaico, deficienze di isolamento, effetti di elet¬ 
tricità statica, induzione; 

e) imperizia, negligenza, errata manovra, nonché azioni 
dolose e colpose in genere; 

f) trasporti e smontaggi connessi con lavori di pulizia o 
di manutenzione; 

g) furto e rapina; 

h) terremoto, maremoto od eruzioni vulcaniche; 

i) persone che prendono parte a tumulti popolari, scio¬ 
peri, sommosse e che perpetrino indivudualmente od 
in associazione atti di terrorismo o sabotaggio verifi¬ 
catisi in occasioni di serrate. 

3) Sez. Il - Responsabilità Civile Terzi 

L’assiGurazionesi intende inoltre prestata per la Respon¬ 
sabilità Civile derivante all’Assicurato dalla proprietà e 

dall’uso personale del Computer assicurato identificato 

nel certificato di assicurazione. 

I massimali di garanzia si intendono fissati in; 


L. 100.000.000 per sinistro con il limite di 

L. 100.000.000 per ciascuna persona deceduta o che 
abbia subito lesioni personali 

L. 100.000.000 per danni a cose e/o animali. 

4) Esclusioni 

La Società non è obbligata per i danni dovuti a: 

- dolo dell'Assicurato; 

- corrosione, deperimento, logoramento che siano con¬ 
seguenza del normale uso o funzionamento o causati 
dagli effetti graduali degli agenti atmosferici; 

- per i quali deve rispondere il fornitore, venditore o loca¬ 
tore degli enti assicurati per legge o per contratto, o per 
inadeguata manutenzione; 

- causati da difetti di materiale o di costruzione che esi¬ 
stevano già all'atto della stipulazione della polizza ed 
erano a conoscenza dell’Assicurato; 

- causati direttamente od indirettamente da avvenimenti 
bellici, sommosse militari, invasioni, adozionedi misure 
da parte di potenze straniere, rivoluzione, ribellione, 
insurrezione, assunzione od usurpazione di potere di 
carattere militare, sequestri; 

- verificatisi in occasione di esplosione, radiazione nu¬ 
cleare o di contaminazione radioattiva; 

- uso improprio del bene (mancato rispetto delle norme 
di impiego dettate dal costruttore); 

- danni estetici (quelli interessanti l’involucro esterno che 
non sia conseguenza di un danno risarcibile a termine 
della presente polizza); 

- guasti casualmente riconducibili ad interventi, a ripara¬ 
zioni e/o modifiche effettuate da un centro non autoriz¬ 
zato dalla casa costruttrice della macchina; 

- danni indiretti in genere. 

5) Operatività della garanzia 

a) La garanzia è operante solamente se gli enti assicurati 
sono ubicati presso il domicilio dell’Assicurato od in 
luoghi diversi da questi se in possesso dell’Assi¬ 
curato. 

b) La garanzia è pure efficace se i beni si trovano sull’au¬ 
tovettura in uso all’Assicurato, salvo i seguenti casi: 

- qualora l’autovettura venga lasciata incustodita dal¬ 
le ore 22 alle ore 6; 

- qualora l’autovettura regolarmente chiusa a chiave 
venga lasciata incustodia dalle ore 6 alle ore 22 e gli 
enti assicurati non opportunamente occultati nel 
bagagliaio. 


c) Limitatamente ai danni di rottura la garanzia è effica¬ 
ce solamente nel caso questi siano dovuti ad un inci¬ 
dente in cui rimanga coinvolto anche il veicolo in uso 
dell’Assicurato che trasportava i beni assicurati. 

d) Per gli enti per i quali non è stato stipulato il contratto 
di manutenzione e/o assistenza con la casa costrut¬ 
trice e/o ditte di essa mandatarie qualora l'ente ri¬ 
chieda per norma del fornitore detto contratto, la 
Società non risponde dei danni verificatisi in conse¬ 
guenza di guasto meccanico e/o elettrico salvo che 
l'Assicurato provi che tale guasto sia causato da even¬ 
to esterno agli enti assicurati o da incendio originato 
da uno di questi enti 

6) Somma Assicurata 

La somma assicurata per ciascun ente deve corrispondere 
al costo di rimpiazzo, ossia al prezzo di listino della casa 
costruttrice ed escluso ogni sconto o prezzo di favore di 
un ente nuovo, eguale od equivalente per caratteristiche, 
prestazioni e rendimento economico. 


7) Premio 

Per ogni singola applicazione è stabilito un premio forfet¬ 
tario omnicomprensivo cosi calcolato: 


Somma assicurata 

Premio 

da 2 500.000 a 3 000 000 

L. 50 000 

da 3 000 000 a 5 000 000 

L. 65 000 

da 5 000 000 a 7 000 000 

L 80 000 

da 7 000.000 a 10 000 000 

L. 100 000 

da 10.000 000 a 15.000 000 

L. 120.000 

da 15.000 000 a 20.000 000 

L. 150.000 


8) Franchigia 

per ogni e qualsiasi danno che colpisca gli enti assicurati è 
stabilita una franchigia di: 

L. 50.000 per somma assicurata fino a L. 5.000.000 
L. 100.000 per somma assicurata superiore a 
L. 5.000.000 

Per sinistri causati da eventi come ai punti g) ed h) delle 
garanzie prestate, la Società liquiderà i danni sotto dedu¬ 
zione di uno scoperto pari al 20% della somma assicurata, 
col minimo delle franchigie sopra stabilite. 

9) Rinvio alle norme di legge 

Per tutto quanto non è qui diversamente regolato, valgono 
le norme di legge. 




V e applicando 

vi mettono al sicuro 


Sì! Desidero assicurare i miei/il mio computer, inviatemi a stretto giro di posta il certificato emesso dalla Ras. 
L'assicurazione avrà valore a decorrere dalle ore 24 del giorno di spedizione della mia adesione. Per la data fa fede il 
timbro postale. 


COGNOME. 

NOME. 

INDIRIZZO. 

CAP. CITTA' . 


. PROVINCIA. 

. N. 

Assicuro i/ll seguente personal: 
Marca e Modello 

N. di matricola 

Valore (IVA compresa) 



Con le seguenti periferiche (stampanti, video, drive, hard disk, ecc) 

Marca e Modello N. di matricola Valore (IVA compresa) 


Nel caso non abbiate sufficiente spazio ricopiate su un foglio il testo completo di questo tagliando indicando tutti i prodotti che intendete assicurare. 

Per un totale complessivo di Lire.su cui pago il premio calcolato in base alla tabella riportata qui sopra (su fondoverde). 

Allego assegno non trasferibile di Lire.intestato a Editronica srl, Corso Monforte 39,20l22Milano. 














































Per predisporre tutti i tipi diversi di carta intestata, tutta la 
modulistica anche autocalcolante. Per scrivere lettere, appunti, 
memo e fatture che trovano da sole la via dell’ archivio. Per 
organizzare davvero, con il Macintosh, tutto il lavoro, ecco My 

Office. In italiano. 


Un ufficio 
tutto automatico 


I mmaginiamo di essere in un ufficio 
tradizionale. "Signorina," dice il 
boss, "mandi una lettera così e così al 
Tale." Cosa fa la segretaria a questo 
punto? Apre il cassettino della carta 
intestata, mette due fogli nella mac¬ 
china da scrivere inserendo a sandwich 
fra i due un foglio di carta carbone (ma 
esiste ancora?), poi fruga nella rubrica 
alla ricerca del nome di battesimo e 
delFindirizzo del Tale. E infine comin¬ 
cia a scrivere. 

Quando avrà finito, ammesso che 
non debba ribattere il tutto per via di 
correzioni o ripensamenti del boss, an¬ 
drà a cercare in archivio la cartelletta 
del Tale per infilarci dentro la copia 


della nuova lettera. 

Ecco, il principio è anche visiva¬ 
mente lo stesso. Però My Office fa 
molto di più. Anche lui ha un cassetto 
di moduli (è l’icona in basso a sinistra 
nella figura di questa pagina), anche 
lui dispone di raccoglitori a tre cassetti 
come il vostro ufficio, nei quali sono 
contenuti i dossier con tutta la corri¬ 
spondenza spedita. E come il vostro 
ufficio dispone di una copiatrice. 

In più, rispetto al vostro ufficio, per¬ 
mette di creare la carta da lettere che si 
desidera, nel formato e con i caratteri 
e i disegni che si preferiscono. 

E addirittura di creare anche della 
carta autocalcolante, cioè dei moduli 


per fatture o altro che prevedano già 
dei campi e i calcoli da effettuare fra i 
campi. 

Inoltre in più, sempre rispetto al vo¬ 
stro ufficio, permette di scrivere una 
lettera e archiviarne la copia automati¬ 
camente; di scrivere senza fatica lette¬ 
re personalizzate a tutti o a parte di 
coloro di cui in archivio c’è un dossier; 
di stampare etichette e liste seleziona¬ 
te degli intestatari di una cartelletta; di 
spedire una lettera al Tale senza do¬ 
versi preoccupare di trascriverne no¬ 
me e indirizzo, di trovare immediata¬ 
mente una cartelletta o un documento 
grazie all’"archivista" incorporato. E 
così via. 
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Zoroastri Amilcare 


Cartella nuoua 


Fatturo 

29/06/85 


Fornitori 


Caro Giovanni, 

Non dimenticare che 
giovedì prossimo siamo 
fuori a cena insieme 


Archivi 


Moduli 


Copiatrice! 
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Una videata di My Office. Le cartelline possono essere estratte dal 
raccoglitore e aperte per vederne il contenuto, che torna automaticamente 
in ordine a lavoro finito. 


Garibaldin Emanuele 

Copertina 

i 

29/06/85 
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In pratica My Office, che è comple¬ 
tamente e perfettamente tradotto in 
italiano diventando così II mio ufficio, 
altro non è se non il vostro ufficio, 
però completamente automatizzato e 
integrato, con la possibilità di stampa¬ 
re i documenti che servono con la nor¬ 
male stampante collegata al vostro 
Mac, oppure con la LaserWriterer 
(che è già prevista e fantastica per 
stampare perfettamente tutto insie¬ 
me, lettere e carta intestata), oppure 
ancora via Modem. 

Vediamo insieme, con l’aiuto delle 
immagini di queste pagine, cosa succe¬ 
de sullo schermo e cosa si può fare con 


Il mio ufficio. 

All’ inizio sullo schermo compare 
un raccoglitore a tre cassetti e le icone 
dei moduli, della copiatrice, degli altri 
archivi, e del cestino della carta strac¬ 
cia. In alto invece, solila riga dei menù 
che chi ha visto anche una sola volta un 
Macintosh conosce benissimo. Inutile 
dunque spiegare che si può cambiare 
carattere o stile. L’ultima parola, 
"Stampa", nasconde invece un menù 
specifico: da qui (figura 1) si può sce¬ 
gliere di stampare etichette postali, 
lettere personalizzate, informazioni 
tratte dai dossier, oppure documenti 
singoli o a gruppi. Come dire che è 


possibile fare tutto il lavoro della gior¬ 
nata e poi stampare tutto insieme ciò 
che dev’essere stampato. 

Le etichette sui cassetti del raccogli¬ 
tore possono essere modificate a piaci¬ 
mento. Basta far click su una di loro 
per aprire un cassetto. All’interno, co¬ 
me in un raccoglitore vero, si vedran¬ 
no le cartelline in modo da poterne, 
leggere 1’ intestazione. Non ci sono 
problemi di spazio: quando fisicamen¬ 
te fossero troppe aH’iterno del cassetto 
per poterle vedere tutte, interviene un 
indicatore alfabetico che fa scegliere la 
lettera desiderata. Facendo click sui 
dossier che interessano, essi vengono 
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Lettere tipo 

Informazioni dalla cartella 
Documenti 


[Clienti 


Fornitori 


| Senza titolo 


Cestino 


Archivi 


Moduli 


[Copiatrice! 


Stampa 



Verdi Annibale 


Bianchi Giovanni 


Cartella nupua. 


Moduli 


Copiatrice! 
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✓Nome 

Gialli Emanuele 



[Titolo 

1 Rag. 

Indirizzo 





Coreo Garibaldi 158 





Città 


Prov. 

Codice 

Milano 


Mi 


20100 

Ditto 



Att 


Tubettificio Tubetti ni Srl 



Emanuele Gialli 

Formula 

Altro 


C8ro ragioniere 





Telefono 

Creazione 

CO 

co 

* w 

29/06/85 


Data 


Documenti 



Una videata iniziale. My Office consente di 
spedire lettere personalizzate, stampare 
etichette, ecc. 



Ecco l’intestazione di una cartella. I dati fissi 
possono essere automaticamente inseriti in una 
lettera in partenza. 



Nu<n>a pagina 
apri 


Dai un nome al cassetto 


29/06/85 [Fattura 


fli t liutista 
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Stile 


Stampa 


Composizione 


Moduli 


Grafici 


Caratteri 


Zoroastri Amilcare 


Gialli Ep 


Chiudi tutto 


Bianchi Giouanni 




Coartino 


Bianchi Giuuaimi 


indice delie cartelle ^ 


'Nome 

[Titolò 

Bianchi Giovanni 

I Dott. 

ndirizzo 



Zia Rossi 121 



Città 

Prov. 

Codice 

Modena 

M0 

00344 

Ditto 

1 Att 


Bianchini e Affini Srl 

I Giovanni Bianchi 

Formula 

Altro 


Caro Giovanni 



Telefono 

Creozione 

343434 

29/06/85 


Data 


Documenti 
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Hrchiuista 


Gariboldin Emonuele 


Memo 


Fine lista: 1 registri 


Fattura 

29/06/85 


Ricerca: 


nella copertina della cartella 


nel nome della cartella 


nel documento 


nel nome del documento 


Cassetto Cai (ella 


Documento 



Si può chiedere airarchivista" di cercare un 
documento. Dallo stesso menù si può cambiar 
nome ai cassetti. 



Ecco l’archivista al lavoro. La parola "cena" è nel 
documento "Memo", nella cartella "Garibaldin 
Emanuele", nel secondo cassetto. 
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automaticamente fuori dal cassetto e 
si dispongono sullo schermo come nel¬ 
la figura di pag. 34. 

La parte di sinistra, detta Coperti¬ 
na, contiene tutte le informazioni fis¬ 
se. Un click su questa parte la fa apri¬ 
re, ottenendo il risultato di figura 2: 
una scheda, più un elenco i documenti 
contenuti nel dossier. La parte di de¬ 
stra invece evidenzia i documenti uno 
per uno: si può passare da uno all’altro 
facendo click nell’ angolino a sinistra 
in basso. Due click rapidi su un docu¬ 
mento lo aprono e consentono di leg¬ 
gerlo. 

Invece trascinare un documento (te¬ 


nendo premuto il pulsante del mouse) 
verso la copiatrice (figura 16) fa aprire 
il pannello di controllo di quest’ulti- 
ma, consentendo la stampa del singolo 
documento nel numero di copie desi¬ 
derate. 

Qual è allora la procedura per scri¬ 
vere un memo al sig. Emanuele Gialli? 
Si tira fuori dal cassetto il suo dossier, 
poi, senza nemmeno aprirlo, si punta 
la freccina sull’icona dei moduli e si 
schiaccia. Si potrà scegliere così il tipo 
e il formato di carta, bianca o predi¬ 
sposta con intestazione, che si deside¬ 
ra utilizzare. Con due click consecutivi 
sul tipo di carta da usare questa si apre 


ed è pronta a ricevere il testo della 
missiva, finito il quale si fa click nel 
quadratino in alto a sinistra del foglio, 
per chiuderlo. Il computer chiederà 
con quale nome si vuol salvare il nuo¬ 
vo documento, e poi andrà a piazzarlo 
automaticamente nel dossier di Ema¬ 
nuele Gialli. 

Un discorso particolare merita la 
creazione della carta intestata e della 
modulistica in generale. Per intesta¬ 
zione, disegni, righe ecc. sono infatti 
disponibili risorse analoghe a quelle 
presenti in programmi come MacPaint 
(figura 8): la matita per disegnare a 
mano libera, il pennello, la mano per 






Il foglio di selezione per la stampa etichette: si 
scelgono i campi e le posizioni di stampa. 


O Le condizioni di selezione: così si otterrà la 

stampa di tutti i nomi dalla A alla C, con codice 
postale inferiore a 20145. 
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I moduli disponibili. Selezionando un formato e 
scegliendo V opzione "disegna" si può impostare 
l’intestazione e i campi. 



Ecco la fase di disegno della carta intestata, 
l’uso della stampante Laser consente risultati 
altamente professionali. 
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spostare il foglio o i righelli sul foglio, 
le righe verticali, quelle orizzonatali, 
la gomma per cancellare, ecc. In più 
c’è il disegno della macchina da scrive¬ 
re, che dà accesso ai caratteri scegliteli 
con il solito sistema del Macintosch. 
Nella figura 9 vediamo i righelli in 
azione, con la manina che li sposta per 
misurare il punto giusto in cui traccia¬ 
re un’altra riga orizzontale. 

Ma in fondo in basso, sullo scher¬ 
mo, compaiono le indicazioni "Defini¬ 
sci i campi" e "Definisci le equazioni". 
A quest’ultima opzione si può arrivare 
ovviamente solo dopo che si siano de¬ 
finiti i campi. Per compiere quest’ope¬ 


razione (figura 10) si prende il campo 
non ancora sistemato (in basso sullo 
schermo) e si sposta fino a posizionar¬ 
lo dove si desidera. Lo si può poi allun¬ 
gare, allargare o restringere come si 
desidera. Nulla impedisce, per la nor¬ 
male carta da lettere, di creare un uni¬ 
co enorme campo. 

Anche definire le equazioni è sem¬ 
plicissimo: la figura 3 mostra chiara¬ 
mente la procedura: anche se l’esem¬ 
pio mostrato è semplice, sono accetta¬ 
ti tutti i segni di operazione e le paren¬ 
tesi. È ovvio che si potranno così pre¬ 
disporre tutti i moduli necessari per le 
proprie esigenze: sarà poi sufficiente 



prelevare il modulo volta per volta ne¬ 
cessario, inserire i dati e lasciare che 
sia il computer a completarlo calcolan¬ 
do automaticamente i campi da ag¬ 
giungere. E a questo punto il modulo 
completo è già nel dossier del destina¬ 
tario! 

Si può spostare un documento da un 
dossier all’altro, e si può anche predi¬ 
sporre una lettera in modo da non do¬ 
ver ogni volta trascrivere nome e indi¬ 
rizzo del destinatario: usando lo stesso 
sistema che consente di spedire lettere 
personalizzate si possono infatti inse¬ 
rire i dati del destinatario prelevandoli 
automaticamente dalla scheda. 
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Un altro momento della fase di impostazione 
della carta intestata. I righelli si spostano sul 
foglio con la manina. 
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Eccoci alla definizione dei campi, basta 
prenderli (da dove ora è il Campo n. 7) e spostarli 
nella posizione voluta. Poi si ingrandiscono a 
piacere. 
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Da dossier si può chiedere di stampare tutti i 
documenti contrassegnati con il simbolino a V, 
in modo da stampare tutto ciò che serve solo a 
fine lavoro. 



Si può stampare anche un singolo documento 
per volta, basta trascinarne Ticona fin sulla 
copiatrice, in basso. 
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È difficile trovare in commercio un 
programma così complesso, così inte¬ 
grato e così utile, eppure così facile da 
usare: tutto è istintivo, perché si rifà al 
normale e tradizionale modo di lavo¬ 
rare in qualsiasi ufficio, per cui tutto 
risulta semplicissimo. Mezz’ora di pra¬ 
tica è più che sufficente, senza nem¬ 
meno guardare il manuale: bastano le 
immagini di queste pagine. Poi si trat¬ 
terà di organizzarsi per ottenere il 
massimo da 11 mio ufficio , inventando 
i moduli che possono semplificare il 
lavoro, automatizzandolo. E questa 
fase naturalmente può richiedere più 
tempo. 


é File Composizione Moduli Grafici Caratteri Stile Stampa 
Fattura Rossi Spa 

Mia Merdi, H ••• 201DO Milano I 

rei. 505050-606066 Te*ex ì.tmtt l. 


M».sra II I N.V r| 


Aiti 0a*r«fcta Pne»> tifi, 


£2 . -J CZO I N ' 4 H I ri 


3CEE3 i n.b 1 1 "Uà 





Definiti i campi si possono definire le equazioni 
aritmentiche che li legano, in modo da creare 
fogli autocalcoianti. 



é File Composizione Moduli Grafici Caratteri Stile Stampa 


Zoroastri Amilcare 


Copertino 


Verdi Annibaie 


Porla della stampante: 


Lunghezza 
del modulo 


Modem I Laser 


guaina : 

I TestolF Grafici 


START 


P 29/06/83 
Copii FW 


Archivi 


Moduli 


Testo e grafici 


C Rk II pannello di controllo della copiatrice. Come si 

[B vede il programma è già predisposto per 

W trasmettere via Modem e per la LaserWriter. 


Corso Italia 149 - 34170 GORIZIA - Tel. 0481/30909 


fhunderScon 


Il sistema grafico per il vostro FI1AC ! Facilissimo da 
usare vi permette di trasformare qualunque immagine 
in un documento ad alta risoluzione FTÌacintosh. Se 
avete, anche solo in parte, acquistato il FTÌAC per le sue 
capacita' grafiche, non potete fare a meno di 
ThunderScan. Fotografie, disegni, mappe, piante 
topografiche, marchi, da originali a colori o in bianco e 
nero, possono essere riprodotti con la precisione di 200 
punti per pollice e con 32 tonalità' di grigio. Andy 
Hertfeld, uno dei realizzatori del software di 
Hìacintosh, ha reso questo strumento estremamente 
semplice e versatile nell'uso. 

Si inserisce al posto della 
cartuccia del nastro nella 
vostra ImageWriter ed e' 
subito pronto a leggere 
qualunque immagine che 
potrete ingrandire sino a 16 
volte o rimpicciolire a 1/16. 


Avete un mAC a 128K e volete p ortarl o a 512K ? 


Telefonateci, vi diremo come in pochi giorni e con poca 
spesa potrete finalmente usare tutto quel fantastico 
software che gira solo sul 512K. Tel. 0481 /30909 



Solo per A p ple Ile 


Lire 140.000 


al nuovo prezzo di 
Lire 298.000 


I compatibile con il mouse Apple a 

Lire 148.000 

per Apple Ile ed Apple Ile Lire 52.000 


Per A p ple Ile 


a Lire 480.000 


Per tutti gli A pple 

- E' un telefono amplificato ed un 
modem CCITT V.21 a 300 baud. Auto/manual Answer, 
FTÌanual Originate, Auto Disconnect. Da connettersi in 
RS-232 C con il vostro computer L. 320.000 

© d SFDD custodia plastica L. 48.000 
D Ill£ Lire 100.000 


Vendita per Corrispondenza Tutti i prezzi indicati 
comprendono l‘I VA nessuna spesa di spedizione per ordini 
superiori alle 50.000 Lire. Prezzi soggetti a variazioni. 

ELCOm C.so Italia 149 34170 GORIZIA Tel. 0481/30909 


37 





























































































Mille programmi 



Nuova edizione 
aggiornata 
e ampliata. 


Le Pagine del Software 
sono un supplemento 
di Applicando, 
il mensile per i personal 
computer Apple. 
Acquistarle 
singolarmente 
costa 15.000 lire. 

Per chi si abbona ad 
Applicando sono in 
regalo. 


Stai per acquistare 
un personal computer Apple? 

Vorrai sapere che cosa puoi farci. 
Questo volume è un aiuto indispen¬ 
sabile, una guida ragionata e com¬ 
pleta di tutti i programmi disponibili 
in Italia. Prima di fare il tuo acquisto 
non puoi non consultarlo, perché 
solo se avrai a disposizione i pro¬ 
grammi che ti interessano la scelta 
non ti lascerà deluso. 

Hai appena acquistato 
un personal computer Apple? 

Senza questa raccolta di program- 


per te 

mi non potrai mai sapere quali e 
quanti utilizzi potrai farne. 

Possiedi già da tempo 
un personal computer Apple? 

Allora non c’è bisogno di dirti quan¬ 
to può essere prezioso questo libro: 
sai già che il tuo computer, senza 
programmi, è come un’auto senza 


benzina. E poiché non c’è limite alla 
fantasia e all’inventiva, consultando 
questa guida scoprirai utilizzi im¬ 
pensati per il tuo personal. Utilizzi 
che ti permetteranno nel lavoro, nel 
tempo libero, nel gioco o nello stu¬ 
dio, di essere sempre il più aggior¬ 
nato, il più organizzato, il più soddi¬ 
sfatto... 

Sei interessato ai programmi 
per Macintosh? 

In questa nuovissima edizione delle 
Pagine del Software per Apple trovi 
elencati, con una approfondita de¬ 
scrizione, tutti i programmi disponi¬ 
bili in Italia. 


Ordinale subito. 
Sarai fra i primi 
a riceverle. 


Desidero ricevere, senza aggravio di spese postali. Le Pagine del Software, con la seguente formula (segnare la casella 
di proprio interesse): 

□ 15.000 lire per ricevere l’edizione 1985 di Le Pagine del Software per Apple 

□ 50.000 lire per ricevere 10 numeri di Applicando e in regalo l'edizione 1985 di Le Pagine del 
Software per Apple 


COGNOME E NOME . 

VIA . 

CAP CITTA . 

□ Allego assegno non trasferibile di L. 

□ Allego ricevuta di versamento di L . 

Corso Monforte 39, 20122 Milano. 

□ Pago fin d’ora con la mia carta di credito Bankamericard N 

Data Firma . 


. N 

. PR0V . 

. intestato a Editronica Srl 

sul CC postale N 19740208 intestato a Editronica Srl, 

.scadenza 


Le Pagine del Software 
per Apple sono pubblicai 
da Editronica, leader 
dell’editoria elettronica. 


Ritagliare, compilare e 
spedire a: Editronica Srl, 
Corso Monforte 39, 
20122 Milano. 
















Ci sono giornate in cui conviene non uscire nemmeno di 
casa, perché va tutto storto; e ci sono giorni baciati dal 
destino in cui si naviga sull’olio. Sarebbe bello saperlo 
prima e organizzarsi meglio la vita. Con questo 
programma in Applesoft si può seguire l’andamento dei 
propri bioritmi: tutti e tre i cicli mese per mese. 


' DOS 3.3 ^ (#■!> 
ProDOS ^llll 
APPLE ././e «Hill 
APPLE //c -«IlII 


Oggi rimango a letto! 


L a giornata "no" l’abbiamo speri¬ 
mentata tutti almeno una volta 
nella vita: fin dal mattino, quando ci 
svegliamo, ci sentiamo uno straccio, e 
tra noi e zio Paperino non c’è gran 
differenza: salta il bottone della cami¬ 
cia, il tappo del dentifricio cade nel 
buco del lavandino, mettiamo il sale 
nel caffè. Eccetera eccetera: il bilancio 
va via via aggravandosi, e giungiamo 
infine a sera distrutti e duramente pro¬ 
vati. 

Ma ci sono, per fortuna, anche le 
giornate "sì": quattro ore di sonno ci 
bastano per saltare giù dal letto con la 
vitalità di uno scoiattolo; ci preparia¬ 
mo (bellissimi!) e usciamo di casa in 
tempo record; arriviamo in ufficio 
puntuali e passiamo la giornata produ¬ 
cendo idee geniali che conquistano il 
direttore; a sera siamo felici, appagati, 
più belli che mai e tutto sommato 
neanche troppo stanchi. 

Com’è, come non è? È solamente il 
caso? Non c’è magari il modo di mette¬ 
re ordine nella casualità, di scoprire 


con che cadenza si alternano i giorni 
positivi e i negativi, i momenti di gloria 
e quelli di tragedia? 

La teoria dei bioritmi 

Secondo la teoria dei bioritmi questi 
mutamenti nel coordinamento fisico, 
nell’umore e nella prontezza mentale 
si verificano a cicli (chiamati appunto 
bioritmi) che sono basati sugli attributi 
intellettivi, emotivi e fisici, e che han¬ 
no inizio al momento della nascita. 
Ogni ciclo ha una lunghezza diversa e 
influenza parti diverse della nostra esi¬ 
stenza. Il ciclo fisico ha una durata di 
23 giorni, il ciclo emotivo ne dura 28 e 
quello intellettivo 33. 

I cosiddetti giorni critici si verifica¬ 
no all’inizio e a metà di ciascun ciclo, 
quando si passa dalla fase positiva o 
alta alla fase negativa o bassa (e vice¬ 
versa). Per esempio, dato che il nostro 
ciclo emotivo dura 28 giorni, i giorni 
critici coincidono con il primo e il 
quattordicesimo giorno del ciclo. Na¬ 


turalmente i giorni critici influenzano 
ogni persona in modo diverso, a se¬ 
conda delle condizioni generali di sa¬ 
lute, dell’età, dell’educazione e della 
personalità. Sapendo quando cadono, 
comunque, ognuno come meglio cre¬ 
de ha l’opportunità di prepararsi: con 
un po’ di attenzione si potranno supe¬ 
rare più facilmente le giornate difficili. 

Non cambieranno gli stati d’animo e 
non si potenzieranno le energie, è 
chiaro, ma già la semplice conoscenza 
dei cicli fisici, emotivi e intellettivi po¬ 
trà aiutare ognuno a sintonizzarsi me¬ 
glio con se stesso, particolarmente nei 
giorni in cui le cose sembrano un po’ 
fuori squadra. Un grafico dei bioritmi 
mostrerà i giorni alti, bassi e critici, in 
modo che sia possibile sfruttare attiva¬ 
mente i periodi buoni e compensare 
quelli meno buoni (tavola 1). Tra le 
caratteristiche di questo programma, 
le videate di testo e grafica e i rendi¬ 
conti composti permettono infatti di 
vedere simultaneamente tutti e tre i 
cicli un mese alla volta. 


































































Listato 1 


10 REM #*****#«#***##****###** 

20 REM * BIORITMI * 

30 REM * DI LEE BANKS * 

40 REM * COPYRIGHT (C) 1985 * 

50 REM * BY APPLICANDO & * 

60 REM * MICROSPARC, INC. * 

11 W m.u poke io4,«: PO 

KE 14384.0: PRINT CHR» (4)“RUN BIORITMI" 

90 TEXT : HOME 

100 REM DIMENSIONA MATRICI 

110 : 

120 DIM D(8) .CIN<33,2) f CEM<28,2),CPH(23,2),CV(31),PL(31).MA 
U2),W(12) 

130 REM MA = GIORNI PASSATI. MN = GIORNI DEI MESI 
140 POR 1 = 1 TO 12: READ MA(I),MN(I): NB< T 
150 : 

160 REM LEGGE VALORE INTELLETTIVO 

170 : 

180 FOR I = 1 TO 33: FOR V = 1 TO 2: READ CINU,V): NEXT : 

NEXT 
190 : 

200 REM LEGGE VALORI EMOZIONALI 

210 : 

220 FOR I = 1 TO 28: FOR V = 1 TO 2: READ CEM<I,V)s NEXT : 
NEXT 


230 

240 

250 

240 

270 

280 

290 

300 

310 

320 


330 

340 

350 

340 


370 

380 

390 

400 


410 

420 

430 


REM LEGGE VALORI FISICI 

FOR 1 = 1 TO 23: FOR V = 1 TO 2: READ CPH(I ,V) : NEXT : 

NEXT 

GOTO 800 

DATA 0.31.31.28.59,31,89.30,120,31,150,30,181,31,212 
,31,242,30,273,31,303,30,334,31 

REM VALORI COMPOSTI - INT 

DATA 15.3,18,4,21.9 24.12,27,15.30,18,33.21,34,24,34,2 
2,3Ì,19 l 28,14.25,l3,22,l0,Ì9,7,l4,4,13.1,l0.’2.),-é,4,- 
S.l,-ll,-2,-lÌ r U?, ! 8,-20 -Ì1.-2J,- 2 -2M,-21 -J, 
-18,-3 r 15,0 r l2,5,-9,6,-6 J 9 J -3 } }2,0 

REM VALORI COMPOSTI - EMO 

DATA 14,4.18.8.22.12.24,14,30.20.34,24,38,28.34,24,30 
,20,26,14.22,12.18,8,14,4.10,0.4,-4,2.-8 -2,-1^,4,-14. 
-10,-2$.-14,-24,-1 è,-28,-i4,-2Ì,-101-^0, : 4,-16,-2,-12,è 
,-8,4,-4,1,0 

REM VALORI COMPOSTI - FIS 

DATA 10,2,12,4,14,4/.4,8.18.10.19.11.17,9,15.7.13.5.1 
!.3 j .?,l J 7,-L5,-à,3,-à,l,-^-I,-^,^,-il,-2,-lÓ f Ó,-à,^ 
-6,4,-4,4,-2,8,0 

REM ASSEGNA VALORE COMPOSTO 


440 DI = (D2S / 33) - INT <DZS / 33):D2 = DI * 33:MI(1) = 

IN T (D2 + .5): IF MICI) = 0 THEN MKl) = 1 

450 03 = (D7S / 28) - INT (D2S / 28):D4 = D3 * 28:EI(1) = 

INT (D4 4 .5): IF EHI) = 0 THEN EHI) = 1 
440 D5 = (DZS / 23) - INT (D2S / 23):D4 = D5 * 23:PH1) = 

INT (Dò 4 .5): IF PIU) = 0 THEN PIU) = 1 

470 for i = 1 to mim) 

480 IF TP» = "INT" THEN CVU) = CIN(MIU),1) ♦ CEM(EHl),2) 

♦ CPH(PIU) .2) : G0SUB 1500: NEXT 

490 IF TP» = "EMÙ" THEN CVU) = CIN(MI(1),2) ♦ CEH<EI<1),1) 
+ CPH(PIU).2): GOSUB 1500: NEXT 
500 IF TP» = "FIS" THEN CVU) = CIN<MI<1),2) 4 CEM(EIU),2) 

♦ CPH(PIU).1): GOSUB 1500: NEXT 

510 IF TP» = "MED" THEN CVU) = CIN(MH1),2) + CEM(EH1),2) 

♦ CPH(PIU) ,2) : GOSUB 1500: NEXT 

520 : 

530 REM MODIFICA VALORI TRACCIAMENTO 
540 : 

550 for i = 1 to mento 

540 IF CVU) = 0 THEN PLU) = 100: NEXT : GOTO 630 
570 IF CVU) > 0 AND CVU) < 100 THEN PLU) = 100 - CVU): 
NEXT : GOTO 630 

580 IF CVU) > 100 AND CVU) < 160 THEN PLU) = CVU): NEXT 
: GOTO 630 

590 IF CVU) < 0 THEN PLU) = (CVU) * -1)4 100: NEXT 
600 : 

610 REM RETICOLO GRAFICO COMPOSTO 
620 : 

ùftp . urni fip— o.p - 1 

640 HPLOT OTi 10 279,0 TO 279,159 TO 0,159 TO 0,0: HPLOT 0, 
100 TO 279.100 

650 FOR I = 1 tO 279 STEP 9: HPLOT 1.0 TO 1,159: NEXT 
660 HPLOT 1,90 TO 7,90: HPLOT 4,86 T0 3,94: HPLOT 2,110 TO 
7.110 

670 HOME : VTAB 21: PRINT 1 1 7 10 15 20 

25 31": POKE 34,22 

680 : 

690 REM TRACCIAMENTO GRAFICO COMPOSTO 
700 : 

710 P = 1 

720 HPLOT 9,PL(P) 

730 P = 2 

740 FOR 1 = 18 T0 279 STEP 9 

750 HPUT T0 I ,PL(P) : VTAB 22: IF P = MN(TMN) THEN 1350 
760 P = P + 1 : NEXT : GOTO 1350 
770 : 

780 REM OPZIONI DISPONIBILI 
790 : 

800 TEXT : HOME : HTA8 12: INVERSE : PRINT ■ B I 0 R I T M 

I ": NORMAL : PRINT TAB( 12)“- B : POKE 

34,2: PRINT : PRINT “(C) 1985 BY APPLICANDO & MICROSPAR 
C INC" 

810 VÌAB 8: HTAB 5: PRINT “D POSIZIGNE NEL CICLO “ : VTAB 1 
0: HTAB 5: PRINT “2) GRAFICO COMPOSTO “: VTAB 12: HTAB 
5: PRINT “3) FINE “ 

820 VTAB 21: PRINT “INTRODUCI NUMERO DELL'OPZIONE ->“ 5:6 
E T N»:N = 'VAL (N$) : IF N < 1 OR N ) 3 THEN HOME : VTA 
B 12: GOTO 840 
830 GOTO 850 

840 POR I = 1 TO 30 :X = PEEK ( - 16336) 4 PEEK ( - 16336) 
4 PEEK ( - 16336): NEXT : HTAB 2: FLASH : PRINT “ S C 
E L T A NON V A L I D A B : FOR I = 1 TO 1000: NE 


Come creare 
il grafico composto 

È fuorviante parlare separatamente 
di ciascun ciclo bioritmico, poiché 
"funzionano" tutti e tre assieme. Il gra¬ 
fico composto generato dal program¬ 
ma BIORITMI (listato 1) combina 
pertanto i cicli intellettivo, emotivo e 
fisico; il composto rappresenta la som¬ 
ma algebrica di tutti e tre i valori asse¬ 
gnati a ciascuna giornata di ciascun 
ciclo, più un valore per la particolare 
personalità dell’utente, che va stabili¬ 


ta in partenza. 

A questo fine vengono forniti questi 
nove quesiti, che aiutano a individuare 
se la personalità dell’utente è più spic¬ 
catamente fisica, emotiva oppure in¬ 
tellettiva, o se è di tipo medio. Non 
passate troppo tempo a meditare le 
risposte: le più valide sono quelle alle 
quali si arriva rapidamente. Potete da¬ 
re una sola risposta a ogni domanda. 

1. In una piccola crisi: 

a. Resti calmo e padrone di te? 

b. Ti metti a piangere? 

c. Aggredisci il problema? 


2. Preferisci: 

a. Fare giochi che mettono alla pro¬ 
va la mente? 

b. Andare a teatro? 

c. Impegnarti nello sport attivo? 

3. Quando devi prendere una decisio¬ 
ne: 

a. Studi con cura la scelta migliore? 

b. Ti affidi all’intuizione? 

c. Vai per tentativi? 

4. Una persona che ti conosca bene ti 
definirebbe: 

a. Logico? 


40 














XT : HOME : GOTO 800 
850 IF N = 3 THEN 1370 

860 HOME : VTAB 12: INPUT "INTRODUCI IL TUO NOME PREGO ->": 
NZ*: IF NZ* = "ANNA" THEN BMN = ? :8DA = 24:BYR = 48: PR 
INT : PRINT : GOTO 920 

870 IF NZ* = “GIUSEPPE" THEN Mi = 8 : BOA = 14 : BYR = 53: PR1 
NT : PRINT : GOTO 920 

880 HOME : VTAB 5: PRINT "INTRODUCI MESE, GIORNO E AMO DI 
NASCITA": PRINT 

890 VTAB 10: CALI - 958: VTAB 11: PRINT "<1=GEN. 2=FEB, EC 
C.)": VTAB 10: INPUT "MESE-)";K*:BMN = VAL (K$): IF BM 
N < 1 OR BM ) 12 THEN 890 

900 VTAB 13: CALL - 958: INPUT "GIORNO-)":K*:BDA = VAL (K 
*): IF BOA < 1 OR BDA ) 31 THEN 900 
910 VTAB 15: CALL - 958: VTAB 16: PRINT "(ULTIME 2 CIFRE)" 
: VTAB 15: INPUT "AMO-)";K*:BYR = INT ( 'VAL <K*)): IF 
BYR < 0 OR BYR ) 99 THEN 910 

920 POKE 34,0: HOME : HTAB 11: INVERSE : PRINT " TIPI DI PE 

RSQNALITA' NORMAL : PRINT "- 

.—-.": PRINT : PRINT : REM 40 TRATTINI 

930 VTAB 6: PRINT "INTELLETTIVO = INT": PRINT : PRINT "EMOZ 
TONALE = EMO": PRINT : PRINT "FÌSICO = F1S": PR 
INT : PRINT "MEDIO = MED": PRINT : PRINT : INPUT 

"INTRODUCI IL TUO TIPO -) ";TP* 

940 IF TP* < ) MNT” AND TP* < ) "EMO" AND TP* < > "FIS" 
AND TP* <; > "MED" THEN HOME : (/TAB 10: GOTO 920 

950 : 

960 REM INTRODUCE DATA MIRATA 
970 : 

980 HOME : PRINT "INTRODUCI DATA MIRATA. 

990 VTAB 10: CALL - 958: VTAB 11: PRINT "(1=GEN, 2=FEB, EC 
C.)': ‘VTAB 10: INPUT "MESE-)" ;K*:TMN = VAL -K*): IF TM 
N < 1 OR TMN ) 12 THEN 990 

1000 VTAB 13: CALL - 958: INPUT "GIORNO-)";K*:TDA = VAL ( 
K*): IF TDA < 1 OR TDA ) 31 THEN 1000 
1010 VTAB 15: CALL - 958: VTAB 16: PRINT "(ULTIME 2 CIFRE) 
": VTAB 15: INPUT "ANNO-)" :K*:TYR = INT ( 'VAL (K*>): 
IF TYR < 0 OR TYR ) 99 THEN 1010 
1020 : 

1030 REM CALCOLA GIORNI 
1040 : 

1050 IF TYR < BYR THEN 870 

1060 IF TYR = BYR AND TMN < > BMN THEN YRS = 0:DAZ = INT 
(MA(TW) - MA (BMN) * TDA 4 ,5):D2S = INT (DAZ - TDA): 
GOTO 1150 

1070 IF TMN < BM THEN TYR = TYR - 1 :YRS = TYR - BYR:DAZ = 
INT (YRS * 365.25)!DAZ = INT (DAZ ♦ (MA(12) - MA(BM 
)) + MA(TMN) 4 (MN(BMN) - BDA)) 4 TDAiDZS = INT (DAZ 
- TDA) 4 1; GOTO 1150 

1080 DAZ = INT (DAZ 4 <MA< 12) - MA (BMN)) 4 MA (TMN) 4 (W(B 
W) - BOA)) 4 TDA 

1090 IF TMN ) m THEN YRS = TYR - BYR:DAZ = (YRS * 365.25) 

: DAZ = INT (DAZ 4 MA(TMN) - MA(BMN) 4 TDA) 4 ,5:DZS = 
INT (DAZ - TDA): GOTO 1150 

1100 IF TYR = BYR AND TMN = BMN AND TDA = (BDA) THEN DAZ = 
1:DZS = 1: GOTO 1150 

Ilio IF im = BW AND TDA = (BDA) THEN YRS = TYR - BYR:DAZ 
= INT ((365.25 * YRS) 4 ,5):DZS = INT (DAZ - BDA) 4 
1: GOTO 1150 

1120 IF TDA < (BDA) THEN YRS = (TYR - 1) - BYR:DAZ = (YRS * 
365.25) 4 (MN(BMN) - BDA) 4 (365.25 - MA(BMN 4 1) 4 1 
) : DAZ = INT (DAZ 4 MA(TMN) 4 TDA) 4 ,5:D2S = INT (DA 


Z - TDA): GOTO 1150 

1130 IF TDA ) (BDA) THEN YRS = TYR - BYR:DAZ = (YRS * 365.2 
5):DAZ = DAZ 4 INT (TDA - BDA) 

1140 DZS = INT ((YRS * 365.25) 4 ,5):DZS = INT (DZS 4 MA< 
TMN)) 

1150 PH = INT (DAZ / 23):PI = INT (DAZ - (PH « 23)):EM = 
INT (DAZ / 28):EI = INT (DAZ - (EM * 28)){ME = INT 
(DAZ / 33):M3 = INT (DAZ - (ME * 33)) 

1160 IF MI = 0 THEN MI = 33 

1170 IF MI < 1 THEN MI = 1 

1180 IF EI = 0 THEN E! = 28 

1190 IF EI < 1 THEN E1 = 1 

1200 IF PI = 0 THEN PI = 23 

1210 IF PI < 1 THEN PI = 1 

1220 IF N = 2 THEN POKE 34.0: HOME : VTAB 12: HTAB 15: FLA 
SH : PRINT "STO LAVORANDO": NORMAL : GOTO 440 
1230 : 

1240 REM VISUALIZZA RISULTATI 
1250 : 

1260 HOME : HTAB 9: IWERSE : PRINT "BIORITMI": NO 

RMAL : PRINT TAB* 9)"-POKE 34,2: V 

TAB 5: REM 21 TRATTINI 

1270 PRINT "CICLO FISICO COMPLETATO "PH:: PRINT : GOS 
UB 1410: PRINT "GIORNI DA INIZIO CICLO CORRENTE:"PI : I 
NVERSE : PRINT PN*: NORMAL : PRINT : GOSUB 1540 
1280 PRINT "CICLO EMOZIONALE COMPLETATO "EM:: PRINT : GOS 
UB 1440: PRINT "GIORNI DA INIZIO CICLO CÓRRENTE :*E1: I 
NVERSE : PRINT EN*: NORMAL : PRINT : GOSUB 1540 
1290 PRINT “CICLO INTELLETTIVO COMPLETATO "ME:: PRINT : GOS 
UB 1470: PRINT "GIORNI DA INIZIO CICLO CÓRRENTE:"MI : I 
NVERSE : PRINT MN*: NORMAL : PRINT : GOSUB 1540 
1300 : 

1310 REM ROUTINE CONCLUSIVA 
1320 : 

1330 VTAB 23: PRINT ' GRAFICO COMPOSTO (S/N) ? " ; : 6ET A*: 
PRINT A*: IF A* = "S" THEN POKE 34,0: HOME : VTAB 12 
: HTAB 15: FLASH : PRINT "STO LAVORANDO" : NORMAL : GOT 
0 440 

1340 GOTO 1360 

1350 HOME : VTAB 22: HTAB 5: PRINT “GRAFICO COMPOSTO PER IL 
-> "TDA E -"TMN"-"TYR n 

1360 VTAB 23: CALL - 958: PRINT ' UN'ALTRA DATA (S/N) ? 

GET A*: IF A* = "S" THEN TEXT : HOME : GOTO 980 
1370 TET : HOME : VTAB 12: PRINT "ALLORA ARRIVEDERCI....": 
END 

1380 : 

1390 REM DECIDE STATO: ALT0-8ASS0-CRITIC0 
1400 : 

1410 IF PI = 11 OR PI = 1 THEN PN* = "CRITICO": RETURN 

1420 IF PI ) 11 THEN PN* = "BASSO": RETURN 

1439 PN* = "ALTO": RETURN 

1440 IF EI = 14 OR EI = 1 THEN EN* = "CRITICO": RETURN 

1450 IF EI ) 14 THEN EN* = "BASSO": RETURN 

1460 EN* = "ALTO": RETURN 

1470 IF MI = 16 OR MI = 1 THEN MN* = "CRITICO": RETURN 
1480 IF MI ) 16 THEN MN* = "BASSO": RETURN 
1490 MN* = "ALTO": RETURN 

1500 MI(1) = MIO) ♦ 1: IF MI(l) ) 33 THEN MIO) = 1 

1510 EHI) = EI(1 ) + 1: IF EHI) ) 28 THEN EIO) = 1 

1520 PIO) = PIO) + 1: I c PIO) > 23 THEN PIO) = 1 

1530 RETURN 

1540 FOR 1 = 1 TO 38: PRINT NEXT : PRINT : RETURN 


b. Impulsivo? 
e. Atletico? 

5. Le attività della tua esistenza sono 
principalmente: 

a. Analitiche? 

b. Artistiche? 

c. Fisiche? 

6. Ti definiresti principalmente: 

a. Intellettivo? 

b. Emotivo? 

c. Fisico? 

7. Avendone i requisiti, preferiresti 
essere: 


a. Uno scienziato? 

b. Un artista interpretativo? 

c. Un atleta professionista? 

8. Se dovessi castigare un bambino che 
è sotto la tua responsbilità: 

a. Sceglieresti una punizione appro¬ 
priata al gesto commesso? 

b. Diventeresti troppo sensibile ed 
eviteresti la punizione? 

c. Sculacceresti il bimbo? 


9. Nel tuo tempo libero preferisci: 

a. Leggere? 

b. Guardare la televisione? 


c. Fare un lavoro manuale? 


Sommate le a, le b e le c. Se ce ne 
sono cinque o più in una delle tre cate¬ 
gorie la vostra personalità è individua¬ 
ta: 


a = intellettiva 
b = emotiva 
c = fisica 


In caso contrario, la vostra persona¬ 
lità può definirsi media. 
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DORLAND ITALIANA 



L’arte di decidere richiede strumenti 

di sintesi veloci e affidabili, capaci di sintetizzare 

i singoli punti in un unico quadro. 



Più difficili sono le decisioni che devi prendere, 
più importante è che tutti gli elementi siano organiz¬ 
zati in maniera sintetica e comprensibile. 

Il tuo personal, anche se è certamente in grado 
di fornirti tutti i dati di cui hai bisogno, non è sempre 
capace di esporteli nella forma in cui ti servono. 

Strumenti decisionali insostituibili 

Per questo la Hewlett-Packard, all’avanguardia 
nell’elettronica mondiale, ti propone i suoi plotter, che 
organizzano fatti e cifre 
complesse in grafici co¬ 
lorati, facili da compren 
dere. Con i plotter HP 
tendenze di mercato, 
analisi di prodotto, pre¬ 
visioni finanziarie 
prendono corpo in diagrammi precisi, curve colorate, 
istogrammi, grafici circolari, accelerando i tuoi pro¬ 
cessi decisionali e rendendo le tue presentazioni, 
meeting, rapporti, più incisivi ed efficaci. Troverai i 
plotter HP in tre versioni: a 8 e 6 penne, nel formato 
UNI A3 ed A4, ed a 2 penne, nel formato UNI A4. 

Compatibili con tutti i personal 

E potrai usarli col tuo personal, anche se non hai 
un HP, infatti i nostri plotter sono compatibili con 









tutti i principali personal sul mercato. 

Se vuoi saperne di più ti basterà compilare in 

s ogni sua parte 
l’accluso coupon: 
riceverai, senza 
impegno, una 
documentazione 
dettagliata sui 
MHHP plotter HP e il loro 
impiego. 

Hewlett-Packard Italiana S.p.A. 

Via G. Di Vittorio 9 - 20063 Cernusco Sul Naviglio 
Milano-Tel. 02/923691 



I Se vuoi saperne di più sui plotter HP 
■ invia questo tagliando a Hewlett-Packard Italiana S.p.A. 
Marketing Communication C.P. 10190,20100 Milano. 


Nome e Cognome 
| Società _ 


Indirizzo 


n 


HP-soluzioni produttive 
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Il grafico composto 

Nella maggior parte degli altri pro¬ 
grammi di bioritmi il risultato conclu¬ 
sivo è una schermata che presenta tre 
schemi d’onda (figura 1). Ora, con 
questo metodo si vede in effetti la rela¬ 
zione esistente fra i singoli cicli, ma è 
difficile avere un quadro chiaro della 
propria situazione generale. La mag¬ 
gior parte delle persone non ha il tem¬ 
po di calcolare come ciascun ciclo in¬ 
fluisca sugli altri. Per esempio, può 
darsi che il 5 novembre si sia al sesto 
giorno del proprio ciclo intellettivo, al 
diciassettesimo giorno del ciclo emoti¬ 
vo e aH’undicesimo giorno del ciclo 
fisico. Qual è la posizione complessiva 
che ne risulta? E in che situazione si 
sarà una settimana dopo, il 12 novem¬ 
bre? 

Il grafico composto fornisce queste 
informazioni sotto forma di diagram¬ 
ma di un’unica linea per qualsiasi mese 
scelto. La composizione combina tutti 
e tre i cicli con il tipo particolare di 
personalità e traccia il grafico. Così si 
può dire a prima vista esattamente 
qual è la propria posizione generale in 
qualsiasi specifico giorno di quel mese 
(figura 2). 

Come adoperare il 
programma 

L’impiego del programma BIO¬ 
RITMI è facile. Quando lo si fa girare 



Figura 1. Grafico dei bioritmi tipico. 


la prima volta si avrà un menù che 
permette di scegliere se: 


1. Visualizzare la propria posizione 
corrente nei cicli bioritmici. 

2. Visualizzare un grafico compo¬ 
sto. 

3. Finire. 


L’opzione 1 del menù, "Posizione 
nel ciclo", vi dice quante volte avete 
completato ogni ciclo, a quale giorno 
di ciascun ciclo vi trovate e quale è il 
vostro stato (alto, basso o critico) in 
ogni ciclo. Non traccia i cicli sullo 
schermo, ma si limita a darvi le infor¬ 
mazioni, chiedendovi poi se volete un 
grafico composto per quel mese, come 
quello che si vede nella figura 2. 

L’opzione 2 non fa che tracciare il 
grafico, e non visualizza le informazio¬ 
ni sulla "posizione nel ciclo" (si veda la 
figura 3). Pertanto, per avere le infor¬ 
mazioni su una specifica data si usi 
l'opzione 1, per avere una panoramica 
del mese si ricorra all’opzione 2. 



1 7 10 15 20 25 31 

GRAFICO COMPOSTO PER IL -> 27-6-85 

Figura 2. Grafico composto. 


Come introdurre 
il programma 

Per introdurre BIORITMI basta di¬ 
gitare il programma visibile nel Listato 
1 e salvarlo su dischetto con il coman¬ 
do: 


_ SAVE BIORITMI _ 

Se vi serve aiuto, potete chiederlo 
alla rubrica "Per chi comincia", in que¬ 
sto numero di Applicando. 

BIORITMI è strutturato in modo 
che ognuna delle funzioni del pro¬ 
gramma sia svolta in un modulo sepa¬ 
rato. Alle variabili sono stati dati dove 
possibile nomi mnemonici, come si ve¬ 
de nella tavola 2. Ecco una lista delle 
funzioni del programma con i numeri 
di linea corrispondenti: 

80-120 Riposiziona il programma 
sopra lo schermo Hi-Res e dimensio¬ 
na le matrici. 

170-260 Legge i valori composti 
per ciascun ciclo e tipo di personalità. 

280-400 Dati. 

440-510 Assegna i valori composti 
a seconda del tipo di personalità e di 
ciascuna posizione di ciascun ciclo. 

550-590 Modifica i valori di traccia¬ 
mento perché stiano nel display. 

630-670 Disegna il reticolo per il 
grafico composto. 

710-760 Disegna il grafico compo¬ 
sto. 

800-840 Visualizza il menù delle 
opzioni. 

860-870 Vede se i dati del nome e 
della nascita dell’utente sono nel file. 

880-910 Chiede i dati della nascita 
se non sono nel file. 

920-940 Chiede il tipo di personali¬ 
tà e controlla se è accettabile. 

980-1010 Chiede la data scelta e 
controlla se è accettabile. 

1050-1210 Calcola il numero dei 
giorni vissuti alla data scelta e dei gior¬ 
ni vissuti il primo giorno del mese scel¬ 
to per il grafico. 

1260-1290 Visualizza i cicli com¬ 
pletati e la posizione nei cicli. 


Tavola 1: Prospetto dell’attività 

STATO DEL CICLO 

ATTIVITÀ* RACCOMANDATA 

Fisico 

Emotivo 

Intellettivo 

Alto 

Alto 

Alto 

Il periodo migliore per 
progettare ed eseguire azioni 

Alto 

Alto 

Basso 

Adatto per 1 compiti manuali 
e per coltivare amicizie 

Alto 

Basso 

Basso 

Adatto per esercitare capacità fisiche; 
disposizione mediocre; pensiero confuso 

Basso 

Basso 

Basso 

Riposo e compiti non impegnativi 

Basso 

Basso 

Alto 

Momento adatto per pianificare; evitare 
attività e trattative non indispensabili 

Basso 

Alto 

Basso 

Dedicare tempo al pensiero creativo 
astratto e alla soluzione dei problemi 

Alto 

Basso 

Alto 

Evitare conflitti di personalità; svolgere 
compiti analitici (non creativi) e 
attività fisiche 

Basso 

Alto 

Basso 

Evitare esercizi fisici e conflitti emotivi 
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BIORITMI 


CICLO FISICO COMPLETATO 506 
GIORNI DA INIZIO CICLO CORRENTE:23 
BASSO 


CICLO EMOZIONALE COMPLETATO 415 
GIORNI DA INIZIO CICLO CORRENTE: 18 
BASSO 


CICLO INTELLETTIVO COMPLETATO 352 
GIORNI DA INIZIO CICLO CORRENTE:22 
BASSO 

Figura 3. Posizione nel ciclo. 


1330 Chiede se si vuole il grafico 
composto, e in caso affermativo lo di¬ 
segna. 

1360 Chiede se si vuole controllare 
un’altra data. 

1410-1490 Decide lo stato in cia¬ 
scun ciclo (alto, basso, critico). 

1500-1530 Incrementa la posizione 
nei cicli per il tracciamento del grafico 
composto. 

1540 Stampa una riga di segni di 
uguale (=). 


Nelle linee 860-870 troverete dei 
dati di nascita già impostati, che servo¬ 
no da esempio, per mostrarvi come 
impostarli: 24 settembre 1948 si inseri¬ 
sce digitando BMO = 9, BDA = 24, 
BYR=48, e basta aggiungere una o 
più righe se a voi si aggiungono uno o 
più altri utenti; in questo caso vanno 
usate come guida le linee 860-870, in 
modo che tutti gli utenti possano ado¬ 
perare il programma senza dover in¬ 
trodurre ogni volta da capo i loro dati 
di nascita. 


Questo programma è disponibile su 
dischetto. L’elenco, i prezzi e le 
modalità d’ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 



Tavola 2: Variabili principali 

A$ 

Reazione dell’utente 

BDA 

Giorno di nascita 

BMN 

Mese di nascita 

BYR 

Anno di nascita 

CEM () 

Valori emotivi composti 

CIN ( ) 

Valori intellettivi composti 

CPH ( ) 

Valori fisici composti 

evo 

Totali iniziali composti 

D1-D6 

Giorni dall’inizio del ciclo il primo giorno del mese scelto 

DAZ 

Totale dei giorni vissuti alla data scelta 

DZS 

Totale dei giorni vissuti il primo giorno del mese scelto 

EI 

Giorni dall’inizio del ciclo emotivo alla data scelta 

EI (1) 

Giorni dall’inizio del ciclo emotivo il primo del mese scelto, 
aggiustati 

EM 

Numero dei cicli emotivi completati 

EN$ 

Stato emotivo (basso, alto, o critico) 

I 

Contatore di loop 

MA () 

Giorni trascorsi nell’anno 

ME 

Cicli intellettivi completati 

MI 

Giorni dall’inizio del ciclo intellettivo alla data scelta 

MI (1) 

Giorni dall’inizio del ciclo intellettivo il primo del mese scelto, 
aggiustati 

MN$ 

Stato intellettivo (basso, alto, o critico) 

MN () 

Giorni nel mese 

N$ 

Opzione del menù 

N 

Valore diN$ 

NZ$ 

Nome dell’utente 

P 

Punto di tracciamento 

PH 

Cicli fisici completati 

PI 

Giorni dall’inizio del ciclo fisico alla data scelta 

PI(1) 

Giorni dall’inizio del ciclo fisico il primo del mese scelto, 
aggiustati 

PL ( ) 

Valori di tracciamento aggiustati 

PN$ 

Stato fisico (basso, alto, o critico) 

TDA 

Data scelta 

TMN 

Mese scelto 

TP$ 

Tipo di personalità 

TYR 

Anno scelto aggiustato 

V 

Variabile di loop 

XPEEK 

(-16336) per cicalino 

YRS 

Anni vissuti 



• Disk drive da 640 K formattati per sistemi operativi DOS 3.3*, ProDos*, Pascal*, CP/M* 

• Controller per due disk drives da 640 K o da 143 K 

• AM 10 buffer programmabile (spooler) da 64 a 256 K 

• Interfaccia Macintosh*/Apple Ile* - stampante grafica standard Centronics* 

• Espansioni di memoria da 128 K RAM, gestiti con disco virtuale 

• marchi registrati 

In vendita presso i migliori 
computer shop 


Bula/Ud tei. 0432-961014 Tlx 450608 
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Volete sapere quanto consuma la vostra auto? Potete 
annotare diligentemente la percorrenza e i litri di 
carburante e poi fare i relativi calcoli. Oppure, molto più 
semplicemente, caricare su Apple questo programma e... 


DOS 3.3 '♦ ll11 
ProDOS ♦UH 
APPLE .//e '♦•IH 
APPLE //c •♦llll 


Occhio ai consumi 


C hi non ha mai pensato di tenere in 
auto un quadernino su cui rego¬ 
larmente segnare i chilometri percorsi 
da un rifornimento di benzina o di ga¬ 
solio all’altro e i litri di carburante ac¬ 
quistati? 

Quelli che hanno provato a tenere 
una registrazione ordinata dei dati sul 
consumo della loro auto, il più delle 
volte però non si sono mai presi la 
briga di elaborare in modo intelligente 
i dati acquisiti in modo da avere un’i¬ 
dea dei veri costi del carburante nell’u¬ 
so della macchina in rapporto alla per¬ 
correnza. 

Si inizia sempre pieni di buone in¬ 
tenzioni e poi, per pigrizia o per scarsa 
costanza, si finisce per trascurare qual¬ 
che registrazione, dimenticando ma¬ 
gari il notes in macchina col risultato di 
non fare mai i "quattro conti" che do¬ 
vrebbero dare le indicazioni utili per 
sfruttare il proprio mezzo nel migliore 


dei modi, come consigliano tutte le 
riviste specializzate. 

Non basta infatti avere i dati diligen¬ 
temente registrati, bisogna ricavare da 
questi delle cifre e dei prospetti da cui 
sia facile poi trarre le necessarie indi¬ 
cazioni pratiche per poter impostare 
l’uso della propria macchina in modo 
da ottenere un effettivo risparmio di 
carburante. A volte poi la stessa scelta 
del mezzo di trasporto dipende dalla 
conoscenza sui dati caratteristici della 
propria automobile: chi viaggia molto 
per lavoro non può ignorare le buone 
regole dell’economia di gestione del 
proprio mezzo e solo avendo dati ag¬ 
giornati sul consumo della propria vet¬ 
tura può fare le necessarie scelte con 
altri sistemi di trasporto, i cui costi 
invece sono facilmente rilevabili da un 
tariffario. 

Ma se avete un Apple non avete più 
problemi di questa natura usando 


CONSUMO, un programma scritto 
espressamente per fornire velocemen¬ 
te e in modo chiaro le eleborazioni dei 
dati relativi al consumo della vostra 
auto. CONSUMO infatti fornisce un 
rapporto aggiornato sull’andamento 
dei consumi della vostra auto e calcola 
automaticamente il consumo medio 
sull’intero periodo della registrazione 
dei dati immessi permettendo quindi 
non solo di sapere con certezza quan¬ 
do è il momento di fare una capatina 
dal meccanico perché il consumo della 
vostra auto peggiora rispetto alle per¬ 
correnze passate, ma anche il calcolo 
esatto del costo della singola trasferta 
in relazione alla percorrenza. 

Come si usa 

Il programma CONSUMO produce 
rapporti grafici nella prima pagina in 
alta risoluzione. Per tale motivo quan¬ 
do viene fatto partire con il RUN si 
può notare un piccolo ritardo dovuto 
alla preparazione nella pagina grafica 
dei caratteri del rapporto. 

Dopo questa fase vi vengono propo¬ 
ste le istruzioni, subito dopo potrete 
scegliere se aprire un nuovo file o se 
lavorare con un file già creato in prece¬ 
denza. 

Naturalmente la prima cosa da fare 
per iniziare a usare CONSUMO è 
aprire il file che conterrà i dati di per¬ 
correnza e di consumo della vostra au¬ 
to. Per fare questo è sufficiente rispon¬ 
dere S alla domanda iniziale che vi 
propone di aprire un nuovo file. Per 
avere la possibilità di tenere sottoc¬ 
chio i consumi di più automobili vi 
consigliamo di dare a ogni file il nome 
dell’auto (solitamente si batte il mo¬ 
dello ma nel caso di una ditta che abbia 


Figurai p IAT 
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più auto dello stesso modello e della 
stessa marca è consigliabile nominare 
ogni file con il numero di targa). 

Se invece avete già aperto il file ri¬ 
guardante la vostra auto dovete ri¬ 
spondere N alla domanda che vi chie¬ 
de se volete aprire un nuovo file e 
specificare il nome del file su cui volete 
inserire nuovi dati. 

All’apertura di una nuova registra¬ 
zione dovrete specificare il chilome¬ 
traggio inziale dell’auto e il giorno in 
cui inizia la registrazione. 

A questo punto si possono inziare a 
registrare i dati relativi alla percorren¬ 
za e ai rifornimenti di carburante presi 
dal famoso quadernetto che tenete in 
macchina e su cui annotate il chilome¬ 
traggio e i litri acquistati ad ogni rifor¬ 
nimento. 


I dati immessi vengono elaborati e 
presentati sotto forma di grafico con 
l’andamento dei consumi tra registra¬ 
zione e registrazione evidenziato con 
una linea spezzata che fornisce l’indi¬ 
cazione sull’aumento o diminuzione 
del consumo. Inoltre compare una ret¬ 
ta orizzontale che segnala il consumo 
medio da quando sono iniziate le regi¬ 
strazioni dei dati. 

Se commettete un errore nell’intro¬ 
duzione dei dati verrete avvertiti da un 
segnale acustico e da un messaggio: il 
computer rimarrà in attesa che battia¬ 
te il tasto giusto. I segnali di errore 
possono essere: 

GIORNO < ULTIMO GIORNO 

che vi avverte di seguire l’ordine cro¬ 
nologico nell’introduzione dei dati e vi 
permette di accertare un errore di bat¬ 


titura nella data dell’ultima registra¬ 
zione (quella che l’Apple non ha ac¬ 
cettato perché precedente ad una regi¬ 
strazione già memorizzata). 

È possibile però introdurre più dati 
di consumo di carburante nella stessa 
data e quindi il segnale di errore non 
viene visualizzato se battete una data 
già introdotta nell’ultima registrazio¬ 
ne di dati. 

Se invece battete una data inesisten¬ 
te come il 31 settembre o il 30 febbraio 
apparirà sul video: 

GIORNO NON VALIDO 

Analogamente digitando per errore 
un numero superiore a 12 o inferiore a 
1 per i mesi avrete il messaggio: 

MESE > 12 
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Listato 


10 REM ********************** 

20 REM « CONSUMO * 

30 REM » BY DANIEL WH3TNEY * 

40 REM « COPYRIGHT <C) 1985 * 

50 REM * BY APPLICANDO & « 

60 REM * M1CROSPARC, INC. * 

?0 REM ********************** 

75 TEXT : CALL - 936 

80 IF PEEK (104) < ) 64 THEN POKE 103.1: POKE 104,64: PO 
KE 16384.0: PR1NT CHRI <4)"RUN CONSUMO* 

90 GOSUB 2030: REM PRESENTAZIONE E ISTRUZIONI 

100 MG = 100 

110 W = CHRI (4) 

120 DEF FN R(X) = INT (X * 100 + .5) / 100 
130 DEF FN MOD(A) = A - INT (A / 8) * 8 
140 OS = 18 

150 DT = 0 

160 HOME 

170 DIM 0(60),M(6Q),MI(60),6(60),YM(12),ftl(12),C(63,6) 

180 FOR 1 = 0 TO 12: READ MN(I): NEXT I 

190 DATA 0.3!,28.31,30.31,30,31,31.30,31,30.31 

200 HOME : PRINT 'UN MOMENTO..." : PRINT : PRÌNT *STO DEFINE 

NDO I CARATTERI*: FOR I = 0 TO 63: FOR J = 0 TO 6: READ 
C(I,J): NEXT J.l: HOME 

210 POKE - 16368,0: INPUT "VUOI CREARE UN NUOVO FILE ? *; 

ZI: ZI = LEFTI (Zl,l): IF ZI < ) "S B THEN 270 
220 INPUT B KM INIZIALI': ";XI:0M = VAL (XI): IF OH < 0 THEN 
220 

230 VTAB 3: INPUT "GIORNO INIZIALE: ";XI:DP = INT ( VAL (X 

I» 

235 VTAB 4: INPUT 'MESE INIZIALE: *;M$:W = INT ( VAL (NI) 

) 

240 IF iti < 1 OR Iti ) 12 THEN VTAB 4: CALL - 868: GOTO 23 
5 

245 IF DP < 1 OR DP > fW(NN) THEN VTAB 3: CALL - 958: GOT 
0 230 

250 GOTO 380 

260 REM RICEVE I DATI DAL FILE ESISTENTE 

270 INPUT 'NOME DEL FILE ESISTENTE (?=CATALOG) ? ":NAI: I 
F LEFTI (MI, 1) = *?* THEN PRINT DTCATALQG - : GOTO 27 
0 

280 IF LEN (NAI) = 0 THEN 270 

290 IF LEN (NAI) > 13 THEN NAI = LEFTI (NAI,13) 

300 ONERR GOTO 2200 

310 PRINT DVVERIFY *NAI 

320 PRINT DI:"OPEN ":NAI: PRINT DI ;"READ ";NAI 

330 INPUT DTjQM.MN.Dr 

340 FOR DI = 1 TO DT: INPUT M(DI),D(DI),MI(D1),G(DI) 

350 NEXT DI 

360 PRINT DI;"CLOSE ";NAI 


370 POKE 216,0 

380 PM = QN:M = MN:D = DP: CALL - 936: HGR 
390 VTAB 23 
400 GOSUB 1400 

410 FOR 11 = 0 TO M - 1:DA = DA ♦ fW(II): NEXT II 

420 XX = (DA ♦ D) * 5 / 7:Y = 150: HPLOT OS.Y TO XX 4 0S,Y 

430 IF DT = 0 THEN M(0) = NW:D(0) = DP: GOTO 520 

440 ! = DT 

450 FOR DT = 1 TO I 

460 M = M(DT):D = D(OT) :G = G(DT):MI = MKDT) 

470 GOSUB 1300 
480 PM = MI 
490 NEXT DT 
500 DT = I 

510 Y = 23:X = ((40 - LEN (MI)) / 2 4 1) : N$ = NAI: GOSUB 
1160 

520 DT = DT 4 l 
530 HOME ; VTAB 21 

540 PRINT "ULTIMA DATA : "D(DT - 1)V"M(DT - 1);: HTAB 22: PR 
INT "ULTIMI KM: "PM 
550 VTAB 22: CALL - 868 

560 VTAB 22: INPUT "GIORNO -> B ;XI:D = VAL (XI) 

: IF D < 0 THEN 800: REM 13 SPAZI 
563 VTAB 22: CALL - 868 

565 VTAB 22: INPUT "MESE -)";XI:M= VAL (XI): I 

F M < 0 THEN 800: REM 11 SPAZI 
570 IF M = M(DT - 1) THEN IF D < D(DT - 1) THEN GOSUB 197 
0: GOTO 550 

580 IF D ) hft(M) THEN IF D < >29 THEN GOSUB 1960: GOTO 
550 

590 D = INT (D) 

620 IF M ) 12 THEN GOSUB 1940: GOTO 563 
630 IF M < M(DT - 1) THEN GOSUB 1950: GOTO 563 

640 M = INT (M) 

650 VTAB 22: CALL - 868 

660 VTAB 22: INPUT "LITRI ->";GI: IF G < 0 THEN 8 

00: REM 9 SPAZI 
662 GF = 0 

664 G = VAL (Gl) 

668 IF G > MG OR 6 = 0 THEN GF = 1 
670 IF GF THEN GOSUB 1980: GOTO 650 
680 VTAB 22: CALL - 868 

690 VTAB 22: INPUT "KM FINALI ->";XI:MI = VAL (XI): 
IF MI < 0 THEN 800 

700 IF MI - PM < =0 THEN GOSUB 1990: GOTO 680 
710 VTAB 22: CALL - 868: VTAB 22: PRINT "DATA: "D"/"M;: HT 
AB 12: PRINT "LITRI: "Ss: HTAB 23: PRINT "KM: "MI 
720 VTAB 23: CALL - 868: VTAB 23 

730 PRINT FN R((MI - PM) / 6)" KML ":: IF (MI - PM) / G ) 
25 THEN PRINT ") 25 0 : : CALL - 198 
740 HTAB 20: INPUT "E' GIUSTO? ";OKI 
750 IF LEFTI (OKI, 1) < > "S* THEN 530 


oppure, se è sbagliato bordine crono¬ 
logico della registrazione, comparirà: 


MESE > ULTIMO MESE 


Anche nel caso che commettiate un 
errore nel numero di litri acquistati in 
una sola volta sarete avvertiti con un 
messaggio d’errore. Il programma in¬ 
fatti non ammette rifornimenti supe¬ 
riori a 100 litri per volta (ma il dato, 
nell’improbabile ipotesi che il vostro 
serbatoio possa contenere di più, può 
essere variato con una piccola modifi¬ 
ca al programma, come vedremo tra 
poco) e quindi l’introduzione di un nu¬ 
mero di litri superiore provocherà il 
messaggio: 


LITRI NON VALIDI 


Se infine commettete un errore nel- 
l’introdurre il numero di chilometri re¬ 
lativi a un rifornimento inserendo un 
chilometraggio inferiore a quello del¬ 
l’ultima registrazione avrete il messag¬ 
gio: 


KM NON VALIDI 


Dopo avere introdotto tutti i dati e 
averli confermati avrete la videata re¬ 
lativa all’elaborazione dei dati che ha 
fatto Apple. 

Come accennato, il rapporto com¬ 
prende il grafico dei consumi tra regi¬ 
strazione e registrazione e una linea 
orizzontale più sottile che individua il 
consumo medio da quando avete ini¬ 
ziato a introdurre i dati e segnala gli 
scostamenti dalla media generale per 
ogni introduzione di dati. 

Il programma CONSUMO permet¬ 


te un esame approfondito del rapporto 
su video dei dati elaborati dato che il 
computer riprende il funzionamento 
solo dopo che è stato premuto un tasto 
qualsiasi. 

Dopo avere considerato bene i risul¬ 
tati dell’elaborazione potrete salvare 
su disco i dati appena introdotti trami¬ 
te l’opzione proposta che richiede an¬ 
che un nome del file di non più di 13 
caratteri. 

Per avere una copia stampata del 
grafico generato da CONSUMO si 
può salvare l’immagine grafica con un 
BSAVE. In tal modo il grafico rias¬ 
suntivo verrà archiviato su disco con il 
nome del file di dati a cui è relativo, 
preceduto da P. (P seguita da un 
punto). 

Per stampare il prospetto sarà suffi¬ 
ciente utilizzare gli appositi program¬ 
mi di stampa di immagini grafiche che 
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760 D<DT) = 0:M(DT) = M:6(DT) = G:MJ(DT) = MI 
770 60SUB 1300 
780 PM = MI 
790 GOTO 520 

800 60SUB 1810: GOSUB 1730: FRINÌ “UN TASTO PER FINIRE E SA 
LVARE IL FILE"; : GEI A*: TEXT : HOME 
810 REM SALVA IL FILE 
820 REM 

830 1F ZI = “$“ THEN 870 
840 PRINT “IL FILE INSERITO E': ":NAI 
850 PRINT “CAMBI NOME A “:NAI:: INPUT B 9':AI 
860 IF LEFTI <AI,1) = “N B THEN Al = NAI: GOTO 890 
870 INPUT “NUOVO NOME DEL FILE 3 ;AI: IF LEN (Al) = 0 THEN 
870 

880 IF LEN (A*) ) 13 THEN Al = LEFTI (Al,13) 

890 ONERR GOTO 2250 

900 IF ZI = “S° THEN 940 

910 PRINT DI “VERI FY “NAT 

920 PRINT DI “ RENAME " :NAI V ; Al 

930 PRINT DI;“DELETE *;AI 

940 NAI = Al 

950 PRINT DI;“OPEN “:NA! 

960 PRINT DI;"URITE ;NAI 

970 PRINT OT - 1 1 ,“QM* ,'M“ , D DP 

980 FOR DI = 1 TO DT 

990 PRINT M(DI) B ,“D(DD“ ,'MKDD" ,’G(DI) 

1000 NEXT DI 

1010 PRINT DI: 0 CLOSE “;NAI 
1020 REM SALVATAGGIO COMPLETATO 
1030 POKE 216,0 
1040 H = 0 

1050 PRINT “UN MOMENTO.* 

1060 Y = 23:X = <(40 - LEN (NA$)) / 2 ♦ 1):N* = NAI: GOSUB 
1160 

1070 m = “ 6FMAMGLAS OND“ 

1080 Y = 20:X = ! : GOSUB 1160 
1090 INPUT “VUOI SALVARE IL GRAFICO ?"jABI 
1190 IF LEF T I (ABI.l) = *N a THEf4 1140 
1110 ONERR GOTO 2280 

1120 PRINT DI; B BSAVE P.“NAI“,AI2000.LI2000 U 
1130 POKE 216,0 

1140 INPUT “VUOI CONTINUARE ? *;ABt: IF LEFTI (ABI,1) = “S 
' THEN RUN 

1150 TEXT : CfiLL - 936: END 

1160 REM ROUTINE PER DISEGNARE SULLO SCHERMO 

1170 L9 = D 

1180 FOR I = 1 TO LEN (NI) 

1190 REM CALCOLA L'INDIRIZZO NELLA TAVOLA DE! CARATTERI 
1200 Z = ( ASC ( MIDI (NI, 1,1)) - 32) 

1210 GOSUB 1270 
1220 X = X ♦ 1 
1230 NEXT I 


1240 D = L9 
1250 RETURN 

1260 REM DISEGNA UN CARATTERE 

1270 L = 8192 ♦ FN MOD(Y) * 128 ♦ (X - 1) + 1NT (Y / 8) * 
40 

1280 c OR J = 0 TO 6: POKE L + J * 1024,C(2,J): NEXT 
1290 RETURN 

1300 REM DI SEGNA UN ACQUISTO 

1310 DA = G 

1320 POR II = 0 TO M - 1:DA = DA ♦ MN(II): NEXT II 

1330 X = (DA ♦ D) * 5 / 7 

1340 Y = (MI - PM) / 6 

1350 IF Y > 50 THEN PF = 1: RETURN 

1360 IF DT = l OR PF THEN PF = 0: HPLOT X 4 OS,150 - 3 * (Y 
*2); RETURN 

1370 HPLOT TO X 4 OS,150 - 3 * <Y * 2) 

1380 RETURN 
1390 REM 

1400 REM DISEGNA LO SFONDO 

1410 HCOLOR= 3: HPLOT OS,0 TO OS,150 TO 279,150 

1420 HPLOT OS,120 TO 279.120 

1430 HPLOT OS,90 TO 279,90 

1440 HPLOT OS,60 TO 279,60 

1450 HPLOT OS.30 TO 279,30 

1460 HCOLOR= 5 

1470 HPLOT OS + 1,0 TO OS ♦ 1,30: HPLOT OS + 1,60 TO OS ♦ 1 
,90 

1480 RPLO T OS 4 1,120 TO OS 4 1,150 
1490 HCOLOR= 3 
1500 FOR ! = 1 TO 50 

1510 HPLOT OS - 2,3 « I TO OS,3 » I : REM OGNI TACCA CORRI 
SPONDE A 0.5 KML 
1520 NEXT I 
1530 FOR I = 1 TO 52 

1540 HPLOT OS 4 5 * 1,150 TO OS 4 5 * 1,147: REM OGNI TAC 
CA CORRISPONDE A UNA SETTIMANA 
1550 NEXT I 

1560 YM(C) = 0: FOR I = 1 TO 12 
1570 YM( I) = MN<» 4 YM(I - 1) 

1580 NEXT I 

1590 HCOLOR= 5: FOR I = 1 TO 12 STEP 2 

1600 HPlQT OS 4 YM(I) * 5 / 7,151 TO OS + YM<I + I) * 5 / 7 

1610 ftéxT I 

1620 REM DISEGNA I NUMERI SULL / ASSE Y 
1630 HCOlOR= 3 
1640 HPLOT OS,150 
1650 L9 = D 

1660 X = 1 :Y = 3:NI = “20“ : GOSUB 1160 

1670 X = 1:Y = Y 4 4:NI = “15": GOSUB 1160 

1680 X = 1:Y = Y 4 4:N$ = 'IO": GOSUB 1160 

1690 X = 1 :Y = Y 4 4:N$ = “ 5 B : GOSUB 1160 

(continua) 


normalmente vengono torniti insieme 
alle stampanti. 

Riga per riga 

La linea 80 controlla che il program¬ 
ma sia stato collocato nella pagina gra¬ 
fica in Alta-Risoluzione. In caso con¬ 
trario cambia i puntatori del program¬ 
ma. 

Alla linea 180 vengono definite le 
variabili MN (I): sono i numeri dei 
giorni di ogni mese. Questi valori sono 
usati per controllare le date introdotte 
e per assicurare una scala corretta sul¬ 
l’asse orizzontale. 

Alla linea 200 le variabili C (I,J) 
vengono caricate con i dati che sono in 
fondo al programma. 

Dalla linea 1400 alla 1720 si ha il 
disegno del grafico. Ogni segno sul¬ 


l’asse orizzontale rappresenta una set¬ 
timana mentre sull’asse verticale rap¬ 
presenta un km. I mesi sono indicati 
sull’asse orizzontale con linee alterna¬ 
te. La subroutine generatrice di carat¬ 
teri è usata per indicare i riferimenti 
sull’asse verticale. Se un file esistente 
è richiamato dal disco i dati sono dise¬ 
gnati e il nome del file viene centrato 
alla base dello schermo. 

Le linee da 520 a 790 contengono il 
loop di immissione dei dati principali. 

La linea 1300 contiene la subroutine 
che disegna i dati sul grafico. Digitan¬ 
do -1 il controllo passa alle linee 
800-1030, dove i dati del file vengono 
immagazzinati e il programma finisce. 

Le linee da 1070 a 1080 scrivono le 
iniziali dei mesi lungo l’asse orizzonta¬ 
le nella posizione corrispondente alla 
prima linea di testo sotto al grafico. 

La linea 1120 salva il grafico in 


Alta-Risoluzione. 

Le linee da 1170 a 1240 prendono la 
stringa N$ carattere per carattere. La 
variabile Z contiene i valori ASCII dei 
caratteri, meno 32. 

Le linnee da 1270 a 1290 i valori 
delle variabili C (I,J) sono usati per 
disegnare i caratteri in 
Alta—Risoluzione. 

Le linee da 1300 a 1380 disegnano il 
rifornimento di carburante. 

Le linee da 1400 a 1720 disegnano il 
grafico. 

Le linee da 1730 a 1790 calcolano e 
disegnano il chilometraggio totale. 

Le linee da 1810 a 1920 disegnano la 
curva tratteggiata corrispondente ai 
dati. 

Le linee da 1930 a 2020 sono le trap¬ 
pole di errori di immissione dati. 

Le linee da 2030 a 2110 fanno appa¬ 
rire la videata iniziale e le istruzioni. 
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! 70G 

\m 

1720 

1730 

1740 

1750 

1760 

1770 

1780 

1790 

1800 

1810 

1820 

1830 

1840 

1850 

1860 

1870 

1880 

1890 

1900 

1910 

1920 

1930 

1940 

1950 

i960 

1970 

1980 

1990 

2000 

2010 

2020 


2030 

2040 

2050 

2060 

2070 

2080 


2090 

2100 


2110 

2200 

2210 

?2 / >C 

2230 

2240 

2250 

2260 

2270 


X = 2:Y = 0sN* = "K": GOSUB 1160:X = 2:Y = J:N$ = : 

60SUB 1160:N$ = "L°:X = 2:Y = 2: GOSUB 1160 
D = L9 
RETURN 

REM CALCOLA E DISEGNA LA MEDIA GLOBALE DELL'ANNO 
FOR I = 1 TO DT:H = H ♦ G(I): NEXT I 
PM = MKDT - 1) - OM 
UTAB 22: CALL - 868 

VTAB 22: PR1NT •MEDIA GLOBALE KML= FN R(PM / H) 
HCOLOR= 6: HPLOT OS,150 - 3 * ((PM / H) * 2) TO 279,15 
0 - 3 « ((PM / H) *2) 

RETURN 

REM 

REM DISEGNA 3 PUNTI DELLA MEDIA KML 
HCQLOR= 5: HPLOT XX + OS,150 
1 = DT 

FOR DT = 1 TO I - i 
M = M(DT):D = D(DT):MI = MKDT) 

IF DT = 1 THEN G = G(1):PM = OM: GOTO 1900 

IF DT = 2 THEN G = 6(1) 4 G(2):PM = OM: GOTO 1900 

IF DT = 3 THEN’ G = 6(1) ♦ G(2) + G(3):PM = OM: GOTO 19 

00 

6 = G(DT) 4 6(DT - 1) 4 G(DT - 2):PM = MKDT - 3) 

GOSUB 1300 
NEXT DT 
RETURN 

REM ROUTINE ERRORI INSERIMENTO DATI 
M$ = ‘MESE ) 12 B : GOTO 2000 
m = “MESE < ULTIMO MESE": GOTO 2000 
MI = “GIORNO NON VALIDO": GOTO 2000 
M = “GIORNO(ULTIMO GIORNO": GOTO 2000 
m = “LITRI NON VALIDI": GOTO 2000 
m = "KM NON VALIDI* 

VTAB 22: CALL - 868 

VTAB 22: PRINT MI: FOR I = 1 TO 800: NEXT I 
VTAB 22: CALL - 868: INVERSE : PRINT “PREMI UN TASTO 
PER CONTINUARE NORMAL : CALL - 398: GET TI: PRINT 
: RETURN 

HOME : VTAB 6: HTAB 12: PRINT "CONSUMO* 

VTAB 8: HTAB 11: PRINT "DI DANIEL WHITNEY* 

VTAB 14: PRINT *<C) 1985 BY APPLICANDO 4 MICROSPARC,IN 
C* 

VTAB 21: HTAB 7: PRINT "VUOI LE ISTRUZIONI ? GET T 
I: PRINT T$: IF T$ < > "S" THET4 RETURN 
HOME : VTAB 2: PRINT *'CONSUMO' REGISTRA E DISEGNA*: P 
RINT "IL CONSUMO Di CARBURANTE" 

PRINT ; PRINT “IL PROGRAMMA CHIEDE I DATI RIGUARDANTI" 
: PRINT "GIORNO E MESE DI OGNI RIFORNIMENTO": PRINT "D 
I CARBURANTE, IN CIFRE." 

PRINT : PRINT "POI I LITRI DI CARBURANTE." 

PRINT : PRINT "PER FINIRE E PER CHIEDERE I [ATI": PR1N 
T "ELABORATI. DIGITARE -1.*: PRINT : PRINT "IL PROGRA 
m DISEGNERÀ TRE PIMI": PRINT "INDICANTI LA MEDIA D 
EI DATI." 

VTAB 22: HTAB 9: PRINT "(RETURN) PER CONTINUARE"; : GET 
TI: PRINT : RETURN 

ER = PEEK (222): IF ER = 6 THEN PRINT "FILE NOT FOIN 
D": GOTO 2230 

IF ER = 33 THEN PRINT "FILE TYPE HISMATCH 8 : GOTO 2230 
PRINT "ERRORE NUMERO *;ER 
PRINT DTCLQSE "NI 
GOSUB 2020: GOTO 270 

ER = PEEK (222): IF ER = 6 THEN PRINT “FILE NOT FQUN 

D": GOTO 2270 

PRINT "ERRORE N. *;ER 

POKE 216,0: GOSUB 2020: GOTO 870 


2280 

2290 

2300 

2310 

2320 

2330 

2340 

2350 

2360 

2370 

2380 

2390 

2400 

2410 

2420 

2430 

2440 

2450 

2460 

2479 

2480 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 
2580 
2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 
2690 
2700 
2710 
2720 
2730 
2740 
2750 
2760 
2770 
2780 
2790 
2800 
2810 
2820 
2830 
2840 
2850 
2860 
2870 
2880 
2890 
2900 
2910 
2920 
2930 


ER = PEEK (222): PRINT "ERROR N. *:ER 
POKE 216,0: GOSUB 2020: GOTO 1090 
DATA 0,0.0.0.0.0.0: REM SPAZIO 
DATA 8,8,8.8,8,0.8: REM 1 
DATA 20.20.20.0.0,0.0: REM * 

DATA 29,20,62,20,62.20,20: REM £ 

DATA 8,60,10,28.40.30.8: REM I 
DATA 6,38,16,8,4,50.48: REM V. 

DATA 4,10.10,4,42,18,44: REM 4 
DATA 8,8,8,0,0,0,0: REM ' 

DATA 8,4.2.2,2.4,8: REM ( 

DATA 8,16,32,32.32,16,8: REM ) 

DATA 8,42,28,8,28,42,8: REM * 

DATA 0,8,8,62.8,8,0: REM ♦ 

DATA 0,0,0,0,8,8,4: REM , 

DATA 0,0,0,62,9,0,0: REM - 
DATA 0,0,0,0,0,0,8: REM . 

DATA 0.32.16,8.4,2,0: REM / 

DATA 28.34.50,42,38,34,28: REM 0 
DATA 8.12,8,8,8,6,28: REM 1 
DATA 28,34,32,24,4,2.62: REM 2 
DATA 62,32,16,24,32,34,28: REM 3 
DATA 16,24,20,18,62,16,16: REM 4 
DATA 62,2,30,32,32,34,28: REM 5 
DATA 56,4,2,30,34,34.28: REM 6 
DATA 62,3i,16,8,4,4,4: REM 7 
DATA 28,34,34,28,34,34,28: REM 8 
DATA 28,34,34,60,32,16,14: REM 9 
DATA 0,0,8,0,8.0,0: REM : 

DATA 0,0,8.0,8,8,4: REM ; 

DATA 16,8,4,2,4,8,16: REM < 

DATA 0,0,62,0,62,0.0: REM = 

DATA 4,8,16,32,16,8,4: REM > 

DATA 28,34,16,8.8,0,8: REM ? 

DATA 28,34,42,58,26,2,60: REM § 

DATA 8,20,34,34.62,34,34: REM A 
DATA 30,34,34.30,34,34,30: REM B 
DATA 28,34,2,2,2,34,28: REM C 
DATA 30,34,34,34,34,34,30: REM D 
DATA 62,2,2,30,2,2,62: REM E 
DATA 62,2,2,30.2,2,2: REM P 
DATA 60,2,2,2,50,34,60: REM G 
DATA 34,34.34,62,34,34,34: REM H 
DATA 28,8,8,8,8,8,28: REM I 
DA’A 32,32,32,32,32,34,28: REM J 
DATA 34,18,10,6,10,18,34: REM K 
DATA 2,2,2,2,2,2,62: REM L 
DATA 34,54,42,42,34,34,34: REM M 
DATA 34,34,38,42,50,34,34: REM N 
DATA 28,34,34,34,34.34,28: REM 0 
DATA 30,34,34,30,2,2.2: REM P 
DATA 28,34,34,34,42,18,44: REM Q 
DATA 30,34,34,30,10,18,18: REM R 
DATA 28,34,2,28,32,34,28: REM S 
DATA 62,8.8.8,8.8,3: REM T 
DATA 34,34,34,34,34,34.28: REM U 
DATA 34,34,34,34,34,20,8: REM V 
DATA 34,34,34,42,42,54,34: REM U 
DATA 34,34,20,8,20,34,34: REM X 
DATA 34,34,20,8,8,8,8: REM Y 
DATA 62,32,16,8,4,2,62: REM Z 
DATA 0,0,0.0,0,0,0 
DATA 0,0,0,0,0.0,0 
DATA 62,48,48,48,48.48,62 
DATA 0,0.8.20,34,0.0 

DATA 127,127,127,127,127,127,127: REM DELETE 


Modifiche 
al programma 

Si può modificare il limite massimo 
dei litri di carburante intervenendo 
sulla riga 100 MG=. Normalmente 
tutti i valori sono elaborati tenendo 
conto di due cifre decimali. Per modi¬ 
ficare e introdurre la possibilità di cal¬ 
colare tre cifre decimali bisogna inter¬ 
venire alla riga 120: 


120 DEF FN R (X) = INT (X * 1000 + 
.5) / 1000 


È possibile modificare l’ordine dei 
mesi per iniziare l’anno in modo diver¬ 
so intervenendo sulle righe 180-210 e 
sulla riga 1070. 

Per modificare il numero dei giorni 
del mese di febbraio, che negli anni 
bisestili ha 29 giorni, è necessario in¬ 
tervenire modificando il valore della 
variabile MN (2). 


Il programma CONSUMO può es¬ 
sere anche modificato per creare rap¬ 
porti su qualsiasi genere di quantità 
soggette a un consumo variabile nel 
tempo. DaH’elettricità, al cibo, ai con¬ 
sumi telefonici della famiglia o di un’a¬ 
zienda. 


Questo programma è disponibile su 
dischetto. L’elenco, i prezzi e le 
modalità d’ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 

- ¥ 
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KEY-DATA 

Tre confezioni di diskette originali più un table clock quartz ad 

UN PREZZO STREPITOSO! 



Rivolgiti 

immediatamente 

presso 

il tuo rivenditore 
di fiducia 


Distributore esclusivo per l’Italia 




informatica 


rm 


Via Umbria, 10-36/A 

Tel. (0522) 38655/512345/31334 

42100 Reggio Emilia 



































<*$> Avere il grafico di una funzione può essere inutile se poi 
non si possono esaminare i particolari del suo andamento 
in una certa zona. Se poi si deve vedere la differenza tra 
due curva diverse c’è da fare un difficile e poco preciso 
lavoro di comparazione. A meno che non possiate 
utilizzare questo programma che... 


DOS 3.3 +*■» 
ProDOS +11» 
APPLE //1 +11» 
APPLE //c +1111 


Grafico delle funzioni 


E cco il programma ideale per chi 
ha bisogno di rappresentare gra¬ 
ficamente una o due funzioni e di esa¬ 
minare in dettaglio una sua parte. 
GRAPHICO disegna uno qualunque 
dei quattro quadranti grafici, o tutti e 
quattro, misurando in unità le tacche 
del reticolo. Queste unità si riferisco¬ 
no o a numeri interi o a radianti (se si 
tratta di una funzione trigonometri¬ 
ca). Il programma disegna due funzio¬ 
ni simultaneamente sul reticolo, per¬ 


Come funziona 

Il primo compito che dovete assol¬ 
vere per usare il programma consiste 
nel calcolare la larghezza totale del 
grafico che volete ottenere addizio¬ 
nando i valori assoluti delle estremità 
X negativa e positiva. La stessa cosa 
dovrete fare per l’asse Y. Questi valori 
vengono memorizzati rispettivamente 
nelle variabili W e V. Se volete calco¬ 
lare la larghezza di ciascun numero 
intero dovrete dividere 279 per la lar¬ 
ghezza totale. Fate altrettanto per la 
distanza verticale dividendo 159 per la 
distanza verticale totale. Questi valori 
vengono poi memorizzati in G e H. Gli 
scettici osserveranno che le posizioni 
orizzontali sullo schermo sono 280 e 
quelle verticali 160, e non 279 e 159. 
Ma facendo così le tacche sulla destra 
e alla base dello schermo sarebbero 
arrotondate e stampate fuori schermo. 

Per calcolare dove dev’essere dise¬ 
gnato l’asse Y, il valore negativo del¬ 
l’estremità X è moltiplicato per il valo¬ 
re unitario orizzontale (G). Questa 


ESEMPI DI ESECUZIONE / EQUAZIONI UTILIZZATE 



ASSE X 3,5 
ASSE Y 10,10 


mettendo qualsiasi confronto. 

Per visualizzare qualsiasi diagram¬ 
ma dovrete dimensionare il foglio. Il 
programma chiede le estremità negati¬ 
ve e positive sia dell’asse X sia dell’as¬ 
se Y. Esse vengono poi controllate per 
accertare che abbiate specificato spa¬ 
zio a sufficienza per il grafico. I numeri 
vengono arrotondati al numero intero 
più vicino. Da questi quattro numeri il 
programma calcola il reticolo e traccia 
la funzione nella posizione esatta. 


Come usare 
il programma 

1. Caricare (LOAD) il programma 

2. Ribattere le linee: 430 Y = qua¬ 
lunque funzione di X; 440 Z = qualun¬ 
que funzione di X; 

Es. 430 Y = SIN (X) 

440 Z = TAN (X) 

3. Eseguire (RUN) il programma 

4. Per fermare l’esecuzione premere 
il tasto CONTROL e RESET. 
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430 Y=<4*X‘2-4*X-5> 

440 2=SIN<9*X)+X-1 

ASSE X J,4 

ASSE Y 7,7 



: /../ ** 






430 Y=ABS(0.2*X*2-X-5)-9 

440 2=0.?*X+C0S<3*XH3 

ASSE X 20,20 

ASSE Y 20,20 


operazione vi dice quanto dista l'asse 
Y dal'orlo sinistro dello schermo. Per 
calcolare la posizione dell'asse X mol¬ 
tiplicate il valore unitario verticale per 
il valore positivo estremo dell'asse Y. 
Questo vi dà la distanza dalla sommità 
dello schermo per disegnare l'asse X. 

Adesso non resta che accendere lo 
schermo e cominciare a tracciare. Do¬ 
po aver impostato il colore sul bianco è 
il momento di disegnare gii assi utiliz¬ 
zando le variabili I e J ( I per l'asse X e J 
per l'asse Y). Anche le tacche su que¬ 
sti assi possono essere disegnate trac¬ 
ciando un punto sopra e sotto le linee 
degli assi a intervalli corrispondenti al¬ 
le misure unitarie calcolate in prece¬ 
denza. Qualora il reticolo sia sull’orlo 


dello schermo non è il caso di stampa¬ 
re le tacche laterali dato che sarebbero 
fuori schermo. 

Il tracciamento 
delle curve 

Per tracciare le vostre curve comin¬ 
ciate dall’orlo sinistro dello schermo, 
calcolando il valore di X che esso rap¬ 
presenta. Per far questo dovete pren¬ 
dere la posizione di tracciamento oriz¬ 
zontale di X e dividerla per il valore di 
passo del numero intero, poi sottraete 
il valore dell’estremità negativa di X. 
L'operazione si presenta così: X= 
(Q/G)-ABS (INT (A)). 



Solitudine. 


Solitudine è possedere un computere non usarlo... 
perchè mancano i programmi o l’assistenza tecnica 

finii arruoli fi 

No! Noi non vendiamo solo computers. 

Ma mettiamo a disposizione tutte le risorse che sol¬ 
tanto una grande organizzazione può offrire. Questo 
è il segreto della nostra continua affermazione. 

No! Noi non vendiamo solo computers. 


■Via Nizza, 48/50/52 T. 06/844.84.18 

■ Via Nizza, 26/28/30/32 T. 06/844.11.36 

■ Via Soana, 24/26/28 T. 06/759.15.44 

■ ViaP. Fiscali, 257/257a/257bT. 06/811.02.43 

■ Via Q. Majorana, 149/153/155 (pros.aper.) 

■ Ass. Tee.: ViaTemi, 86/86a/86b T. 06/757.89.36 


OOOO 

CO## 

oo## 

.OOOO 


Computer 

Center 


all’altezza dei tuoi problemi. Sempre. 
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10 REM ********************** 

11 REM * GRAFICO FUNZIONI * 

12 REM * DI MERR3L ROBERTS * 

13 REM * COPYRIGHT <C) 1985 * 

14 REM * BY APPLICANDO ir * 

15 REM * MICROSPARC, INC * 

16 REM ********************** 

110 REM LE LINEE 430 E 440 CONTENGONO 
LE EQUAZIONI 

120 REM INSERIRE LE NUOVE EQUAZIONI 
IN QUESTE RIGHE 

130 TEXT : HOME : PRINT ■<« 1985 BY APPLICANDO 
E MICROSPARC, INC*: VTAB 22 
140 INPUT "ASSE X (NEG , POS)";A,B 
150 INPUT 'ASSE Y (NEG , POS)* D C 
160 U = ABS ( 1NT (A)) + ABS ( INT <B)> 

170 V = ABS ( INT (O) 4 ABS ( INT <D» 

175 !F U < 1 OR V < 1 THEN POKE 34,10: PRINT 
“PARAMETRI NON ABBASTANZA GRANDI": PRINT 
"RIBATTI 1 DATI": FOR I = 1 TO 1000: NEXT I: 
CALL - 936: POKE 34,0: VTAB 22: GOTO 140 
180 G = 279 / U 
190 H = 159 / 0 
200 I = ABS ( INT (A)) * G 

210 J = ABS ( INT (0) * H 

220 HOME : VTAB 21: LIST 430 - 440 
230 VTAB 21: PRINT " ": VTAB 22: PRINT “ 

240 HGR 


250 HCQLOR= 3 

260 HPLOT 0,J TO 279,J 

270 HPLOT 1,0 TO 1,159 

280 FOR X = 0 TO 159 STEP H 

290 IF I < = .5 THEN 310 

300 HPLOT I - 1 ,X 

310 IF I > = 158,5 THEN 330 

320 HPLOT I + 1,X 

330 NEXT X 

340 FOR Y = 0 TO 279 STEP G 

350 IF J < = .5 THEN 370 

360 HPLOT Y,J - 1 

370 IF J > = 278.5 THEN 390 

380 HPLOT Y,J + 1 

390 NEXT Y 

400 HCOLQR= 5 

410 FOR Q = 0 TO 279 

420 X = <Q / G) - ABS ( INT (A)) 

430 Y = X * 2 

440 Z = X*3-3*X 

450 S = H * ABS ( INT <C)> - (Y * H) 

460 IF S ) 0 AND S < 159 THEN HC0LQR= 5: HPLOT Q.S 
470 P = H * ABS ( INT <«> - (Z * H) 

480 IF P > 0 AND P < 159 THEN HCOLOR= 6: HPLOT Q,P 
490 NEXT Q 
500 GOTO 140 
510 END 



Se Q è 0 (ossia l'orlo sinistro dello 
schermo) l'operazione vi darà il valore 
negativo uguale all’estremità negativa 
di X. 

Se O è 279 (ossia l’orlo destro dello 
schermo) l’operazione vi darà il valore 


positivo dell’estremità di X. Facendo 
così, i valori di X sono suddivisi in 280 
sezioni uguali e utilizziamo queste per 
calcolare le equazioni. I risultati sono 
poi memorizzati nelle variabili Y e Z. 

È il momento di convertire i risulta¬ 


ti dei calcoli della formula per vedere 
se compariranno sullo schermo. Per 
far questo moltiplicate il valore di pas¬ 
so verticale a numero intero per il ri¬ 
sultato, quindi potete effettuare la sot¬ 
trazione dal valore di passo verticale a 
numero intero moltiplicato per il valo¬ 
re positivo dell'asse Y. Adesso con¬ 
trollate se il numero è nella fascia com¬ 
presa fra 0 e 159. In pratica così si 
controlla se il risultato sia nella fascia 
dei valori da tracciare sullo schermo. 
In caso affermativo passate al colore 
giusto e tracciatea il punto. In caso 
negativo esso non viene tracciato. Si fa 
altrettanto per la seconda equazione 
(ma in un colore diverso). Il procedi¬ 
mento viene ripetuto 279 volte, ogni 
volta con un valore diverso di X, per 
visualizzare il grafico. 

Poi il programma ritorna per chie¬ 
dere un nuovo reticolo positivo/nega¬ 
tivo. Se si vuol vedere soltanto una 
porzione di quanto è stato disegnato in 
precedenza basta digitare i nuovi valo¬ 
ri positivi e negativi degli assi e l’intero 
procedimento verrà ripetuto, con la 
visualizzazione sullo schermo della 
nuova porzione. 

Le modifiche 

1. Se desiderate un solo grafico po¬ 
tete adoperare soltanto la linea 430 o 
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soltanto la linea 440. L’altra linea può 
essere lasciata bianca. Così si ritracce- 
rà solamente l’asse X. 

2. Se volete tre grafici contempora¬ 
neamente dovete battere queste linee: 


435 ZC= (qualsiasi funzione di X) 
482 R=H*ABS (INT (C))- (ZC*H) 
484 IF R>0 e R<159 THEN 
HCOLOR=2:HPLOT Q,R 


NOTA: Per mostrare solo un qua¬ 


drante sullo schermo si può usare uno 
0 per il valore negativo oppure per il 
valore positivo su ciascun asse. 

Descrizione 
del programma 

Dalla linea 160 alla linea 200 traccia 
il reticolo e le tacche a intervalli di 
uno. 

Dalla linea 210 alla linea 300 calcola i 
valori per le equazioni. Se sono tali da 
comparire sullo schermo li traccia. 
Dalla linea 310 alia linea 320 chiede i 
parametri X e Y per il reticolo. 

Dalla linea 330 alla linea 380 calcola i 
parametri da usare nel resto del pro¬ 
gramma. 

Dalla linea 390 alla linea 400 visualizza 
sullo schermo le curve relative alle 
funzioni che si stanno usando. 

Linea 410 ritorna all’inizio del pro¬ 
gramma per visualizzare il grafico. 
Nota: le funzioni trigonometriche sa¬ 
ranno visualizzate solo in radianti. 


Questo programma è disponibile su 
dischetto. L’elenco, i prezzi e le 
modalità d’ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 

- ¥ 





Basic per i geometri 


QfHJECE 

Agli allievi-geometri e geometri 
professionisti interessati all’uso 
del computer per il proprio la¬ 
voro, l’autore fornisce program¬ 
mi completi di costruzione, e- 
stimo e topografia. 

176 pagine, 19.000 lire 


Per chi non è alle prime armi 
con il linguaggio macchina Z80, 
il libro offre spunti di perfezio¬ 
namento per la creazione di 
programmi efficienti e veloci. 
146 pagine, 18.000 lire 


Come costruire circuiti elettro¬ 
nici completi e funzionanti per 
produrre suoni elettronici. 

102 pagine, 12.000 lire 

Desidero acquistare 

□ ..... 

□ ... 

□ ... 

Pagherò al postino il prezzo indicato + 1.000 lire per contributo spese postali 
□ Desidero solo ricevere il vostro catalogo generale 
Ritagliate e spedite a: 

gruppo editoriale muzzio - via makallè 73 - 35138 padova 


nome...cognome 

via. 

c.a.p.:.città. 


Il libro si propone di avvicinare 
professionisti e hobbisti del 
computer al calcolo automatico 
e alla simulazione di fenomeni e 
esercizi di meccanica e elettro- 
tecnica. 

234 pagine, 20.000 lire 


nghìtiao Dturt rifgtto » Mtrico 

SIMULAZIONI 
DI FISICA IN BASIC 


Come si usa il più diffuso fra i 
programmi per l’elaborazione 
dei testi. 

120 pagine, 12.000 lire 



































































A casa tua, partendo dalle nozioni 
di base e mettendo ogni volta in pratica 
ciò che impari, diventerai un esperto in 
micro-calcolatori. 

Non solo, ma con i materiali del Corso, 1 
costruirai interessanti apparecchiature 
che resteranno di tua proprietà e 
ti serviranno sempre: il MINILAB 
(laboratorio di elettronica 
sperimentale), il TESTER (analizzatore 
universale), il DIGILAB (laboratorio 
digitale da tavolo), l’EPROM 
PROGRAMMER (programmatore di 
memorie EPROM) e PELETTRA COMPUTER 
SYSTEM (microcalcolatore basato sullo Z80). 
Chiedi oggi stesso informazioni gratis e senza 
impegno su questo 
nuovo Corso o 
sugli altri 9 Corsi 
di elettronica 
preparati per 
te da Scuola 
Radio 
Elettra. 


I microcomputer richiedono tecnici capaci di 
assicurarne sempre il perfetto funzionamento. Sapere 
com’è fatto un microcomputer, conoscerne tutti i segreti, 
è il punto di partenza per un’attività moderna, specialistica 
e interessante anche per le possibilità di guadagno. 

Ecco perché Scuola Radio Elettra 
ti propone il CORSO-NOVITÀ 
ELETTRONICA DIGITALE 
E MICROCOMPUTER 

in 44 gruppi di lezioni e 17 serie 
" di materiali con oltre 870 
componenti e accessori. 

Compila e spedisci questo tagliando. 




Scuola Radio Elettra 

Via Stellone 5 10126 Torino 


X 96 


■ Compila, ritaglia, e spedisci solo per informazioni a: 

I SCUOLA RADIO ELETTRA - Via Stellone 5 -10126 Tonno 


Vi prego di farmi avere, gratis e senza impegno, il materiale informativo relativo al Corso di: 

□ Televisione b/n 

□ Televisione a colori 

□ Amplificazione stereo 
D Alta fedeltà 
U Strumenti di misura 


I □ Tecnica elettronica 

sperimentale (NOVITÀ') 

□ Elettronica digitale (NOVITÀ’) 

□ Microcomputer (NOVITÀ’) 

□ Elettronica Radio TV 

□ Elettronica industriale 


(Indicare con una crocetta la casella che interessa) 


COGNOME 
NOME _ 

VIA i_ 

LOCALITÀ' 

CAP |_ 

ETÀ’ _l_ 


_I_i_i PROV. . 

PROFESSIONE . 
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La pubblicità su 
Applicando è informazione. 
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possiede un computer 
Apple o sta per cambiarlo 
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Per avere le scritte perfettamente centrate sia su video 
che su stampante occorre tanta pazienza e tanto occhio. 
Oppure avere in memoria questo Impaginatore che, 
all’occorrenza, può servire anche da word processor... 


:[ DOS 3.3 ttj*l 
ProOOS •♦«Il 
APPLE //e •filili 
APPLE //c ♦llll 


Centrar non nuoce 


Q uando si inzia a programmare, 
l’ultima cosa a cui si fa caso nella 
stesura dei programmi è rimpagina¬ 
zione dei messaggi per l’utente. Vi sa¬ 
rà certamente capitato di scrivere un 
programma con istruzioni all’utente 
che avevano questo aspetto: 


PRIMA INTRODUCI LA RISPO¬ 
STA E PO 

I PREMI IL TASTO RETURN 


Per evitare questo tipo di "incidenti" 
non rimane altra via che fare molta 
attenzione alla tabulazione dei mes¬ 
saggi. Solitamente, soprattutto agli 
inizi della carriera di programmatore, 
non vi sarete curati della corretta im¬ 
paginazione delle vostre scritte e solo 
nella fase di correzione e rilettura del 
listato vi sarete applicati a quest’aspet¬ 
to del programma. Il tutto, natural¬ 
mente, allunga di molto il tempo di 
correzione e perfezionamento dei vo¬ 
stri programmi. 

Il più semplice dei rimedi che è pos¬ 
sibile prendere per accorciare i tempi 
di programmazione è tenere conto in 
anticipo delle 40 colonne di testo sullo 
schermo nelle istruzioni PRINT in 
modo di non dover poi fare molte cor¬ 
rezioni. Ma quando si digita un pro¬ 
gramma, spesso la concentrazione sul¬ 
la parte sonstanziale del soft fa dimen¬ 
ticare tutti i buoni propositi e si finisce 
con il trascurare proprio rimpagina¬ 
zione dei messaggi all’utente. 

Le cose si complicano notevolmente 
quando si vuole avere un messaggio 
ben impaginato anche nell’uscita da 
stampante. Infatti se si vuole un testo 
ben disposto sullo schermo a 40 colon¬ 
ne ci si ritrova ad avere un grande 
spreco di carta nella stampa e vicever¬ 
sa, con le scritte ben impaginate sulle 


80 o 120 colonne che può dare una 
stampante (o qualsiasi altro numero di 
colonne), sullo schermo appare un ve¬ 
ro guazzabuglio di scritte con una pre¬ 
sentazione all’utente davvero poco 
chiara e non professionale. 

La soluzione del problema, come 
sempre, consiste nel far lavorare il 
computer con un apposito programma 
per la formattazione del testo che im¬ 
pagini automaticamente i messaggi al¬ 
l’utente e le scritte che appaiono in 
uno dei vostri bellissimi soft in modo 
da renderne non solo chiara e facile la 
lettura sul video ma anche possibile la 
stampa su carta per il miglior sfrutta¬ 
mento delle sue dimensioni. IMPA¬ 


GINATORE fa tutte queste cose per 
voi, basta digitarlo e richiamarlo nel 
corso di un vostro programma per po¬ 
tersi ritenere completamente sollevati 
dall’impegno della corretta posiziona¬ 
la dei messaggi all’utente e consen¬ 
tirvi di applicarvi con maggiore con¬ 
centrazione al vero "succo" dei vostri 
software. 

Che cosa fa 

IMPAGINATORE è una subrouti¬ 
ne semplice, versatile e facile da usare. 
Prende la riga (o le righe) da stampare 
e cerca uno spazio vuoto nella larghez- 


Listato 1 


10 REM ********************** 

11 REM * IMPAGINATORE * 

12 REM * DI R. SCOTT SMITH * 

13 REM * COPYRIGHT (0 1985 * 

14 REM * BY APPLICANDO & * 

15 REM * M1CR0SPARC, INC * 

16 REM ********************** 

20 REM MC=N. MASSIMO DI C0L0WE PER LA STAMPANTE 
30 REM NC=N. DELLE COLORE DA STAMPARE 
40 REM SP=SPAZ!0 TRA LE VOCI INTRODOTTE 

50 REM SP=0 STAMPA NORMALE 

60 REM SP=-1 CONGIUNSE LE VOCI IN UN UNICO PARAGRAFO 
70 REM SP=N METTE N RIGHE BIANCHE FRA LE VOCI 
80 REM RJ > 0 PER GIUSTEZZA A DESTRA 
90 DIM Ai<20) 

99 GOTO 1000: REM INIZIO DEL PROGRAMMA 

100 REM SUBR0UTINE CHE PREPARA LA STMPA 
110 IF NC = 0 THEN NC = 40:MC = 40 

120 1F MC < NC THEN MC = MC ♦ 40: GOTO 120 

130 LM = ÌNT (CMC - NC) / 2) ♦ 1 

140 IF RIGHTi (Ai,l) < > " ° THEN Ai = Ai + “ “ 

150 IF RIGHTi (Ai,2) = \ * OR RIGHTi (Ai,2) = ’? 1 OR R 

IGHTi (Ai.2) = ’! 1 THEN Ai = Ai + “ a 
160 X = LEN <XÌ>: IF LEN (Ai) ) 250 - X THEN Xi = Xi + L 

EFTi (Ai,250 - X): G0SUB 220:XÌ = Xi + MIDI (Ai,251 - 
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za di colonne voluta, e spezza la riga di 
stampa in quel punto. Prenderà le 
stesse righe di testo e le stamperà a 
20—40—70—132 colonne o a qualun¬ 
que numero di colonne che specifiche¬ 
rete voi stessi. E non avrete più alcuna 
necessità di riscrivere il testo. Ecco qui 
sopra due esempi nei quali sono impie¬ 
gate 30 colonne. 

La realizzazione di margini giustifi¬ 
cati a destra è un’opzione del pro¬ 
gramma. Se vogliamo che il margine 
destro sia ben allineato come il margi¬ 
ne sinistro, e non c’importa degli spazi 
supplementari fra le parole richiesti 
dalla giustificazione a destra (esempio 
1), imposteremo la variabile RJ su 
qualsiasi valore diverso da 0 (il valore 
di default). 

Se invece quegli spazi in più ci dan¬ 
no noia e non c’importa che i margini 
destri siano irregolari, lasceremo RJ al 
suo valore di default e avremo la stam¬ 
pa nel normale stile dei dattiloscritti 
(esempio 2). 

Le funzioni contenute nell’IMPA- 
GINATORE sono simili a quelle della 
maggior parte dei word processor. IM¬ 
PAGINATORE è stato però ideato 
per essere usato non solo con una 
stampante ma anche con lo schermo. 
Inoltre può essere facilmente incorpo¬ 
rato in qualsiasi programma e utilizza¬ 
to con pochi semplici passi, sia che 
stiamo usando un testo lungo e com¬ 
plesso sia che stiamo semplicemente 


GIOVANNI, IL PROGRAMMA 

STAMPERÀ' QUESTE ISTRUZIONI IN 
MARI FORMATI. PRIMA LA STAMPA 
NORMALE E POI LA STAMPA CON 
MODIFICA DELLO SPAZIO • (SF--1) 

E GIUSTEZZA A DESTRA. QUINDI 
LA STAMPA SARA-' RIPETUTA CON 
NC A 30. INFINE, UNA STAMPA 
CON SP A 1 (UNO SPAZIO TRA LE 
VOCI). 

Esempio 1 (giustificato a destra) 

GIOUANNI , IL P R 0 GRAMMA 

STAMPERÀ ; QUESTE ISTRUZIONI IN 
CARI FORMATI. 

PRIMA LA STAMPA NORMALE E POI 
LA STAMPA CON MODIFICA DELLO 
SPAZIO <SP=-1> E GIUSTEZZA A 
DESTRA. 

QUINDI LA STAMPA SARA' 
RIPETUTA CON NC A 30. 

INFINE, 

UNA STAMPA CON SP A 1 (UNO 
SPAZIO TRA LE VOCI>. 

Esempio 2 (non giustificato) 


inviando all’utente istruzioni PRINT. 
È quindi possibile includerlo nei pro¬ 
grammi come subroutine di base da 
richiamare tutte le volte che desideria¬ 
mo stampare qualche messaggio sullo 
schermo o sulla stampante. 

Come si usa 

Per usare IMPAGINATORE basta 
assegnare l’istruzione di stampa come 


stringa alfanumerica alla variabile A$ 
e poi fare GOSUB 100. La conversio¬ 
ne di un’istruzione di stampa all’inter¬ 
no del programma si presenterebbe 
come indicato qui sotto. L’istruzione: 


1000 PRINT "INTRODUCI LA TUA 
RISPOSTA E 

POI PREMI IL TASTO RETURN." 
diventerebbe: 


1000 A$= "INTRODUCI LA TUA 
RISPOSTA E POI PREMI IL TA- 
STO RETURN.": GOSUB 100 

Ecco un altro esempio: 


1010 PRINT "BUON GIORNO 
";NA$;". COME TI SENTI OGGI?" 

diventa 


1010 A$= "BUON GIORNO, " + 
N A $ + ". COME TI SENTI 
OGGI?":GOSUB 100. 


E non c’è da preoccuparsi di quanto 
sia lungo NA$! Se si era presupposto 
che l’utente introducesse solo il nome 
di battesimo, e invece ha introdotto 
nome e cognome (sono cose che gli 
utenti fanno), senza il nostro IMPA¬ 
GINATORE avremmo: 


BUON GIORNO, ANTONIO RO 
SSI, COME TI SENTI OGGI 

9 


C’è andata male anche questa volta! 
Con IMPAGINATORE invece non 
c’è problema: 


BUON GIORNO , ANTONIO 
ROSSI, COME TI SENTI 
OGGI? 


La stampa di matrici stringa è altret¬ 
tanto facile. Per esempio, nel caso di 
1020 FOR 1 = 1 TO 10:PRINT A$ 
(I):NEXT l’istruzione modificata sa¬ 
rebbe 1020 FOR 1=1 TO 10: A$=A$ 
(I):GOSUB 100:NEXT. 

Il controllo 
delle colonne 

Per fissare il numero voluto di co¬ 
lonne dovete utilizzare le due variabili 


X) 

170 !F W = * * THEN GOSUB 400: GOTO 190 
280 XI = X* + Al: GOTO 220 
190 SI = SP 4 ! 

200 !F Si ) 0 THEN GOSUB 400:S! = SI - li GOTO 200 
210 RETURN 

220 REM TROVA SPAZIO VUOTO 

230 1F LEFT$ (XI.1> = ■ “ AND LEFTI (XI,3> < ) “ ‘ THE 

N XI = MIO* (XI.2): GOTO 230 
240 1F LEN (XI) < NC THEN 190 
250 yi = XI 

260 FOR LI = NC 4 1 T0 1 STEP - 1 : IF MIDI (YI,L1,1) = 1 
“ THEN 280 

270 NEXT :L1 = NC 4 1 

280 XI = LEFTI (YI,LÌ - 1): GOSUB 300: 1F LI > 0 THEN XI = 
MIDI <YI,L1) 

290 GOTO 230 

300 REM GIUSTIFICA A DESTRA 
310 !F N0T RJ THEN 400 
320 RM = NC 4 1 - LliJl = LI 

330 !F RIGHTI (XI,1) = “ ” THEN XI = LEFTI (XI, LEN (XI) 

- 1):RN = RM 4 liJ! = Jl - 1: GOTO 330 
340 1F RM < 1 THEN 400 

350 FOR J2 = 1 T0 Jl: 1F MIO» <XI,J2,1> < > ’ * THEN 370 
360 NEXT : GOTO 400 

370 FOR J3 = Jl T0 J2 STEP - 1: 1F RM < 1 THEN 400 
380 1F MIO» <X*.J3,1) = “ • THEN XI = LEFTI (XI,J3> + MI 
DI (XI,J3):RM = RM - 1 

(continua) 
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MC e NC. Queste devono essere im¬ 
postate nella parte principale del vo¬ 
stro programma, prima di usare la su¬ 
broutine. MC deve essere impostato 
sul numero massimo di colonne del 
modo di stampa che volete utilizzare. 
(Per lo schermo video MC=40. Per 
una stampante a 80 colonne MC=80.) 

Impostate poi NC (numero di co¬ 
lonne) sulla larghezza di stampa volu¬ 
ta. IMPAGINATORE centrerà il te¬ 
sto con i margini sinistro e destro 
uguali. Per lo schermo 1005 
MC=40:NC=30 sposterà il testo con 
una marginatura di cinque colonne a 
sinistra e cinque a destra. Si può fare lo 
stesso con la stampante cambiando i 
valori di MC e di NC. 

MC e NC assumono il valore di de¬ 
fault di 40 se non vengono impostati 
prima dell’impiego dell’impaginatore. 
Se NC viene impostato su un valore 
maggiore di MC, il numero massimo 
di colonne MC sarà incrementato di 
valori di 40 fino a essere uguale o supe¬ 
riore a NC. 

Supponiamo che il vostro program¬ 
ma usi lo schermo in una parte e la 
stampante in un’altra. Se MC è impo¬ 
stato su 40 e cambiate NC per la stam¬ 
pante senza cambiare MC quest’ulti¬ 
mo si reimposterà automaticamente 
su 80. (Se la stampante non è a 80 
colonne occorrerà impostare di perso¬ 
na MC sul numero giusto). Se invece 
ritornate allo schermo dovrete reim¬ 
postare il valore di MC, altrimenti MC 
sarà ancora al valore della stampante e 
ne risulteranno strani formati. 

Spaziatura 

supplementare 

IMPAGINATORE contiene una 
funzione di spaziatura supplementare 
che ha molte utili applicazioni. E la 
variabile SP a controllare la funzione. 
Quando SP è impostato su 0 (il suo 
valore di default), IMPAGINATO¬ 
RE stampa il testo con un solo spazio 
fra le voci introdotte (normale). 
Quando è impostato su un numero 
maggiore di 0, metterà quel numero di 
righe vuote fra parola e parola (non fra 
riga e riga). Questo può essere utile 
per staccare le istruzioni. 

Aggiunta di linee 

La funzione primaria di SP (e la ra¬ 
gione per cui è stata inserita nel pro¬ 
gramma) è però quella di aggiungere 
una voce che viene introdotta a un’al¬ 
tra già presente. 


■■■■■ 




SP = - 1 aggiunge ogni nuova istru¬ 
zione PRINT o stringa di caratteri alla 
precedente in modo che formino un 
solo paragrafo continuo. Pertanto se 
avete diverse istruzioni brevi che vole¬ 
te che siano stampate di seguito, la 
funzione di aggiunta vi permetterà di 
farlo con la massima semplicità. 

Il ricorso a questa funzione diventa 
utilissimo quando si ha un paragrafo 
più lungo di 255 caratteri (la lunghezza 
massima che l’Apple ammette per una 
stringa o un’istruzione PRINT). Ma in 
ogni caso è vero che le istruzioni più 
brevi agevolano l’editing e quindi la 
funzione di aggiunta permette di com¬ 
binare tra loro diverse istruzioni sem¬ 
plici per formare un unico paragrafo. 

Per usare la funzione di aggiunta, 
impostate prima SP su -1. Poi inviate 
alla subroutine le stringhe che deside¬ 
rate che siano stampate in un unico 
paragrafo. Per esempio: 

1000 SP = -1 

1010 A$="LA BANDIERA DEI 
TRE COLORI È 

SEMPRE STATA":GOSUB 

100 

1020 A$ = "LA PIU’ BELLA NOI 
VOGLIAMO 

SEMPRE QUELLA.":GOSUB 

100 

1040 A$="":GOSUB 100 

Attenzione: l’ultima stringa dev’es¬ 
sere una stringa nulla per segnalare la 
fine del paragrafo. Un’istruzione 
PRINT non andrà bene e solo la strin¬ 
ga nulla dice alla subroutine di stam¬ 
pare l’ultimo segmento della stringa 
precedente, anziché trattenerlo per 
congiungerlo con la stringa seguente. 
Questo è un punto importante da ri¬ 
cordare. Il mancato invio di una strin¬ 
ga nulla finale quando SP= —1 avrà 
come conseguenza che l’ultimo seg¬ 
mento non verrà stampato alla fine del 
paragrafo, ma congiunto con la voce 
successiva. 

Ecco un esempio di impiego di ma¬ 
trici: 

1000 SP=-1 

1010 FOR 1=1 TO N:A$=STS$ (I): 

GOSUB 100:NEXT 
1020 A$="": GOSUB 100 

Anche in questo caso la costituzione 
del paragrafo termina con una stringa 
nulla. Se non volete che le voci se¬ 
guenti siano agganciate tra loro in pa¬ 
ragrafo potrete tornare alla stampa 




normale digitando 

1020 A$="":GOSUB 100:SP=0. 

Come funziona 

Se non impostate personalmente i 
valori delle variabili MC, NC, RJ e SP 
esse saranno impostate automatica- 
mente sui loro valori di default. Perciò 
se volete il normale formato a 40 co¬ 
lonne non occorre che vi preoccupiate 
di impostarle. Per agevolare l’incorpo¬ 
razione della subroutine in qualsiasi 
programma, abbiamo scelto le varia¬ 
bili provvisorie X$, Y$, SI, LI, Jl, J2 
e J3 (anziché le tradizionali I, J, K, 
ecc.) per ridurre la possibilità di una 
duplicazione delle variabili nel resto 
del programma. 

Le linee 110-130 contengono le 
routine di centratura delle colonne. La 
linea 110 controlla il valore di NC per 
vedere se è stato impostato. In caso 
negativo lo imposta su 40. La linea 120 
controlla il valore di MC per accertare 
che non sia inferiore a quello di NC. Se 
è inferiore incrementa MC di 40. La 
linea 130 è la routine di centratura. 
LM è il valore del margine sinistro, 
ossia metà della differenza fra MC e 
NC. 

Le linee 140-180 sono le routine di 
aggiunta (SP= —1). A$ viene trasferi¬ 
to in X$. Poi X$ viene diviso in sezioni 
uguali a NC che vengono stampate. Se 
l’ultima sezione è minore di NC, non 
viene stampata ma trattenuta fino 
all’A$ seguente, che poi le viene ag¬ 
giunto (linea 170). La linea 140 ag¬ 
giunge uno spazio vuoto alla fine di A$ 
in modo che l’ultima parola sia separa¬ 
ta dalla prima parola della voce suc¬ 
cessiva se SP= —1. La linea 150 prov¬ 
vede il tradizionale doppio spazio vuo¬ 
to fra la punteggiatura finale e la frase 
seguente. 

La linea 160 stabilisce se X$ + A$ 
eccede il limite di 250 caratteri. In caso 
affermativo, A$ viene diviso in due 
parti; X$ percorre la routine di stam¬ 
pa, poi ritorna per il resto. Alinea 170, 
se A$ è una stringa nulla, X$ è inviato 
alla routine di stampa in modo che sia 
stampata anche la parte trattenuta da 
X$. Poi salta alla routine di spaziatura 
delle linee (linea 190). La linea 180 
aggiunge A$ a X$, poi va alla linea 
220, l’inizio deH’algoritmo di stampa. 

Le linee 190—210 sono le routine di 
spaziatura delle linee. Se SP= —1 la 
variabile X$ non viene stampata ma 
trattenuta per l’A$ seguente. Se 
SP=>0 la parte finale dell’A$ conte¬ 
nuta in X$ viene stampata e la routine 
ritorna. Con valori maggiori di 0 ven- 
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Per imparare e divertirsi! 


Hai un Commodore 64 o un VIC 20? 

RadioELETTRONICA&COMPUTER 
proponetutti i mesi i migliori 
programmi che una rivista 
possa pubblicare. Peresempio: 

Budget familiare, Gestione 
del magazzino, Slot Machine, 

Generatore di suoni musicali, 

Labirinto, Generatore di onde quadre, 
Data Base, Gestione Cocktails... 

Hai uno Spectrum? RadioELETTRONICA 
&COMPUTER propone tutti i mesi 
fantastici programmi. Ecco qualche 
esempio: Calcolo combinatorio, Cianago 
(corsa di cavalli in alta risoluzione 
grafica), Data Base, Superquaterna, 
Disegnaschemi, I quiz per la patente, 
Insiemistica e disequazioni... 


Giochi, programmi 
gestionali, utility per 
programmare, novità, 
articoli d'interesse 
generale per l'utilizzo in 
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diffusi in Italia. Etanti 
regali allegati a ogni 
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edicole: cassette con 
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cassette... E fantastici 
concorsi con migliaia di 
premi in palio. 
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gono stampate righe bianche supple¬ 
mentari (linea 200). 

Le linee 220—290 sono il cuore della 
subroutine. Qui si determina dove 
debba essere spezzata la riga per la 
stampa, con la ricerca di uno spazio 
vuoto cominciando dal carattere NC e 
andando aH’indietro (linee 260-270). 
La linea 230 toglie gli eventuali spazi 
vuoti iniziali causati dalla divisione di 
A$ in segmenti, ma lascia quelli che 
siano stati messi lì di proposito (il rien¬ 
tro deve essere di almeno tre spazi). 
La linea 250 trasferisce X$ a Y$ per 
trattenere il suo valore originale. La 
linea 280 invia la parte trovata nella 
linea 260 alla routine di stampa e poi 
determina se siano state stampate tut¬ 
te le parti. In caso negativo va a linea 
230 e il procedimento viene ripetuto. 
Se X$ è inferiore a NC la routine torna 
a linea 190 per il caso che sia stata 
impostata la funzione di aggiunta. 

Le linee 300-390 giustificano il 
margine destro se RJ è impostato. La 
routine aggiunge spazi vuoti fra le pa¬ 
role fino a che la lunghezza è uguale a 
NC. RM è il numero di spazi vuoti 
occorrente per estendere la riga alla 
stessa lunghezza di NC (linea 320). 
Ogni volta che viene aggiunto uno spa¬ 
zio vuoto RM viene decrementato fino 
a che raggiunge 0, il che invierà la riga 
alla routine di stampa. La linea 330 
elimina gli spazi vuoti alla fine della 
riga, e le linee 350—360 impostano il 
limite della ricerca sul primo carattere 
non bianco per contemplare il caso che 
la linea sia rientrata. Le linee 370-390 
fanno passaggi attraverso la riga, ag¬ 
giungendo uno spazio a ogni spazio 
esistente fino a che RM è uguale a 0. 

Le linee 400-450 contengono la 
routine di stampa. La linea 410 è ne¬ 
cessaria per evitare righe bianche sup¬ 
plementari nel caso che il precedente 
X$ fosse esattamente uguale a NC. La 
linea 420 imposta il margine sinistro e 
stampa X$ senza un ritorno carrello. 
Si tratta di una salvaguardia contro il 
ritorno carrello automatico che si veri¬ 
ficherà se NC è uguale al numero mas¬ 
simo di colonne del dispositivo di 
stampa (schermo o stampante). La li¬ 
nea 430 causa un ritorno carrello se 
non se ne è verificato uno. Prima del 
ritorno, X$ è annullato a linea 450 in 
modo che non sia portato nella succes¬ 
siva istruzione PRINT. Per la linea 440 
si noti che sostituendo l’istruzione 
REM con un PRINT si avrà la doppia 
spaziatura (una riga bianca fra ogni 
riga di stampa e la successiva). Questo 
non influisce sulle altre funzioni. An¬ 
ziché un semplice PRINT si potrebbe 
impostare un flag per avere la doppia 


390 NEX7 : IF RM ) 0 THEN 370 
400 REM STAMPA 

410 IF SI - 1 = SP AND X$ = BD THEN RETURN 
420 HTAB LM; PRINT X$; 

430 IF LEN (X*) < )'MC THEN PRINT 

440 REM INTRODUCE UN “PRINT 0 PER DOPPIA SPAZIATURA 

450 X* = “ 8 : RETURN 

4ó0 REM FINE DEL LISTATO 1 

999 REM LISTATO 2 

1000 REM ******************** 

1001 REM * * 

1002 REM * IMPAGINATORE * 

1003 REM * * 

1004 REM * DI R.SCOTT SMITH » 

1005 REM * * 

1006 REM * PROGRAMMA TIPO * 

100? REM * * 

1008 REM ******************** 

1009 REM ADATTA MC/NC/SP ALLE SPECIFICHE DELL'UTENTE. DEFA 
ULT=4G/40/0 

1010 HOME : PRINT : HTAB 14: PRINT “IMPAGINATORE 1 : V7AB 22:' 

PRINT “(0 1985 BY APPLICANDO & MJCRQSPARC. INC. 8 : VTA 
B 8: INPUT “INTRODUCI IL TUO NOME ":NA$: PftlNT 
1020 A$(l) = NA* ♦ 8 , IL PROGRAMMA STAMPERÀ-' QUESTE ISTRUZI 
0N1 IN VARI FORMATI 

1030 A*<2> = "PRIMA LA STAMPA NORMALE E POI LA STAMPA CON M 
ODI FICA DELLO SPAZIO (SP=-1) E GIUSTEZZA A DESTRA. 8 
1040 A$<3) = "QUINDI LA STAMPA SARA' RIPETUTA CON NC A 30." 
1050 A$(4) = "INFINE, 8 

1060 A$(5) = 8 UNA STAMPA CON SP A 1 (INO SPAZIO TRA LE ‘UCCI 

>. fi 

1070 A$(é) = 88 

1080 W = CHR$ (4): G0SUB 1550: HOME : QTA8 3:NC = MC: PRI 
NT D*;“PR£ B :PR 

1090 PRINT'"SENZA (IMPAGINATORE): 8 : PRINT : F0R I = 1 70 6: 
PRINT A$<I ) : NEXT : PRINT 

HOC A* = "E CON (IMPAGINATORE): 8 : 6QSUB 3 00 : G0SUB 1530 
1110 PRINT "NORMALE": PRINT :A = 1:N = 6: G0SUB 1500 
3120 PRINT "FUNZIONE AGGIUNTA = GIUSTEZZA A DESTRA": PRINT 
:SP = - 1:RJ = 1: G0SUB 1500 

3130 HTAB 6: PRINT "LARGHEZZA 30 COLONNE 8 : PRINT :NC = 30: 
G0SUB 1500 

1140 HTAB 6: PRINT “SPAZIO TRA LE VOCI 8 : PRINT :SP = 1: G0S 
UB 1500 

1150 VTAB S : R J = 0:SP = - 1 :NC = 8:MC = 40:A* = "LA BANDI E 
RA DEI TRE COLORI £' SEMPRE STATA LA PIU-' BELLA. 8 : 
60SUB 100 

3160 G0SUB 1530 : SP = 0:NC = 40;A* = "ORA INTRODUCI ALCUNE V 
0CI. (MAX 4). IL PROGRAMMA LE COMBINERÀ' IN UN UNICO 
PARAGRAFO. 8 : G0SUB 100: PRINT 
1170 INPUT “QUANTE VOCI ? 8 ;N 

1180 N = N + 6: F0R I = 7 TÒ N: PRINT "VOCE N. 8 ;l - 6; 8 8 ;: 
INPUT Atti): NEXT 

1190 N = N 4 1:A*<N) = 8 ":A = 7: 60SUB 1550:NC = MC: PRINT 

03 . a pj^£ t , pp 

1200 H0MÈ : VTÀB 3: PRINT "SENZA (IMPAGINATORE):’: PRINT : 

F0R I = A T0 N: PRINT Atti): NEXT ; PRINT 
1210 PRINT :Af = ‘CON (IMPAGINATORE):': G0SUB 100: PRINT :S 
P = - 1: G0SUB 1530 

1220 RJ = 0: PRINT ‘GIUSTIFICATO A DESTRA? ’:: GET 0$: PRIN 
T 0$: IF 3$ = "S‘ THEN RJ = 1 
1230 PRINT : G0SUB 1550: G0SUB 1500 
1240 PRINT : INPUT ‘CAMBIA LARGHEZZA STAMPA (0 INTERROMPI)" 
jNC: IF NC ) 0 THEN 1220 

1250 HOME : 'JTAB 3: PRINT ‘ORA ENTRAMBI I PARAGRAFI RIENTRA 
TI.': PRINT 

12é0 Aid) = " * ♦ A*d):Af(?) = ‘ ‘ + A»(?):A = !:RJ = 

1:NC = MC - 5: G0SUB 1500 
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1270 END 
1500 REM STAMPA 

1510 1F PR THEN PR1NT 0$; B PR£1*: REM ATTIVAZIONE STANMNT 
E 

1515 1F PR AND NC = MC THEN NC = NC - 1 

1520 PR1NT : FOR ! = A TO N:A$ = AKI): GOSUB 100: NEXT 

1530 IF PR THEN PR1NT D$; , PR£0‘ 

1540 PRIMI : HTAB LM: PRIMI 'PREMI UN TASTO GEI Q$: PRI 
NT : HOME : VTAB 3: RETURN 
1550 REM SUBROUTINE UIDEO/STAMPANTE 
1560 PRIMI : HTAB 10: FLASH : PRIMI 'V';: NORMAL : PRINT 'I 

DEC 0 ” : : FLASH : PRINT 'S“:: NORMAL : PRINT CAMPANTE 

?«. 

1570 GETOI: PRINT Gr$:PR = 0:MC = 40: IF Q» = 'S‘ THEN PR = 
1:MC = 80 
1580 RETURN 


LISTATO 2 


1 REM ******************** 

2 REM * IMPAGINATORE * 

3 REM * BREVE * 

4 REM * DI R.SCOOT SMITH * 

5 REM * VERSIONE BREVE * 

6 REM * COPYRIGHT*01985 * 

7 REM * B Y APPLICANDO & * 

8 REM * M1CR0SPARC, INC. * 

9 REM * * 

10 RPM ******************** 

11 REM 

12 REM 

13 REM MC=N. MASSIMO COLONNE PER LA STAMPANTE 

14 REM NON. COLONIE DA STAMPARE 

15 REM 

99 GOTO 1000: REM INIZIO DEL PROGRAMMA 

100 REM SUBROUTINE CHE FORMATTA LA STAMPA 

110 IF NC = 0 THEN NC = 40:MC = 40 

120 IF MC < NC THEN MC = MC + 40: GOTO 120 

130 LM = INI ((MC - NC) / 2) 4 1 

140 IF LEFT$ (Al, 1) = ” * THEN Al = MIDI (Al,2): GOTO 140 

150 IF LEN (ATI < = NC THEN 210 
Ì60 Yl = Al 

170 FOR J1 = NC M TO 1 STEP - 1: IF MIDI <YI,J1,1> = ‘ 

‘ THEN 190 

180 NEXT :J1 = NC + 1 

190 A* = LEFTI <YI,J1 - 1): GOSUB 210: IF J1 >0 THEN Al = 
MIDI <YI,J1) 

200 GOTO 140 

210 HTAB LM: PRINT Al; 

220 IF LEN (Al) < > MC THEN PRINT 
230 Al = RETURN 

1000 REM VERSIERE ABBREVIATA DEL PROGRAMA IMPAGINATORE 
1010 HOME : VTAB 3 

1020 Al = "VERSIONE BREVE <JMPAGIMTORE>.': GOSUB 100: PR1N 
T 

1030 A* = 'INTRODURRE UNA FRASE LUNGA ALMENO DUE RIGHE PE 
R VEDERE COME FUNZIONA QUESTA VERSIONE DELL'IMPAGINA 
TORE.': GOSUB 100: PRINT 
1040 INPUT "FRASE: ,! :Q$ 

1050 HOME : 'VTAB 3:AÌ = 'ECCO LA FRASE SU QUARANTA COLONNE. 

": GOSUB 100: PRINT 
1060 Al = 0»i GOSUB 100: PRINT 
1070 INPUT 'CAMBIA LA LARGHEZZA DI STAMPA: ':NC: PRINT 
1080 GOTO 1060 
1090 END 


spaziatura solo quando la stampante è 
attivata (440 IF PR = 1 THEN 
PRINT). 

Alcune prove 

Dopo aver digitato il programma e 
averlo salvato, provate a fare qualche 
esperimento. Date a NC valori diffe¬ 
renti e provate la funzione SP. Volen¬ 
do potrete personalizzare la subrouti¬ 
ne. Si diano a NC valori differenti e si 
provi la funzione SP. 

Se per esempio non volete i doppi 
spazi vuoti tra le frasi, dovete elimina¬ 
re la linea 150, se preferite che la stam¬ 
pa sia giustificata a destra non c’è biso¬ 
gno della lina 310, mentre, se non vi 
interessa la giustificazione a destra, 
basta eliminare le linee 300—390 e 
cambiare il GOSUB 300 di linea 280 in 
GOSUB 400. Così si accorcerà la su¬ 
broutine di 250 byte. Il listato 3 è una 
versione abbreviata dell’IMPAGI- 
NATORE, nella quale sono state tolte 
le funzioni di spaziatura e giustifica¬ 
zione a destra. Conta meno di 300 byte 
e per molti programmi fa tutto ciò che 
occorre. 

Un programma 
d’esempio 

Abbiamo incluso anche un pro¬ 
gramma esemplificativo per spiegare 
meglio le possibilità di IMPAGINA¬ 
TORE (listato 2) e mostrare i differen¬ 
ti formati ottenibili. A$ è configurato 
a matrice nelle linee 1030-1080 esclu¬ 
sivamente ai fini della ripetizione. Al- 
trimenti basterebbe 
A$ = "...":GOSUB ÌOO (vedi linea 
1150). Inoltre si noti che A$ (6) è una 
stringa nulla (linea 1080). Si tratta di 
un metodo facile per escludere la fun¬ 
zione di aggiunta (SP= —1). 

In conclusione abbiamo scritto IM¬ 
PAGINATORE per risolvere uno 
specifico problema di chi programma, 
ma ci siamo poi accorti che questa rou¬ 
tine ha molte applicazioni utili e che, 
al limite, può essere usata in sostitu¬ 
zione di uno dei costosi word proces¬ 
sor che si trovano in commercio. 

La sua semplicità strutturale lo ren¬ 
de anche soggetto a espansioni e mi¬ 
gliorie che ognuno può apportare per 
avere più funzioni e più possibilità 
operative. 


Questo programma è disponibile su 
dischetto. L’elenco, i prezzi e le 
modalità d’ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 
- 








PER IL TUO APPLE //e & //c. 


Vi piacciono le regate? O preferite esplorare le caverne dell’Olimpo? Oppure vorreste 
avere sul vostro schermo il fantastico gioco della scimmia che scappa arrampicandosi sulle 
pareti lisce di un grattacielo? Siete invece tipi riflessivi e vi dilettate di musica? Non 
preoccupatevi, qui c’è sicuramente quello che fa per voi. Per gli amanti di tanti giochi tutti 
insieme è disponibile una raccolta. Per chi vuole migliorare le proprie capacità di 
programmatore, ecco i trucchi del Basic su dischetto. E tante altre offerte, a prezzi eccezionali. 



BASIC TRICKS FOR THE APPLE. 

35 routine che renderanno molto 
più professionali i vostri pro¬ 
grammi in Basic e che vi sarà 
facilissimo imparare utilizzando il 
manuale e il dischetto offerti in 
elegante confezione a sole 
60.000 lire. 



SPUD e MUGSHOT.il primo po¬ 
ne due giocatori in antagonismo 
tra loro, il secondo può essere 
giocato da un solo giocatore fino 
a quattro giocatori. Grafica in alta 
risoluzione spettacolare. Richie¬ 
de l’uso delle paddle. Dischetto 
con programma e manuale offerti 
in elegante confezione a sole 
50.000 lire. 



PEN PAL. Un word processor 
che può sviluppare fino a 254 
colonne per riga, con possibilità 
di scroll orizzontale e verticale. 
Giustificazione, numerazione 
delle pagine, intestazioni. Cerca 
e rimpiazza testo. Possibilità di 
editing di programmi in Basic. 
Predisposizione per invio via mo¬ 
dem dei testi. Dischetto con pro¬ 
gramma e manuale in elegante 
confezione a 60.000 lire. 



INSTANT RECALL. Un potente 
Data Base i cui file singoli posso¬ 
no superare i 28.000 caratteri. 
Accesso simultaneo a 8 file, per 
un totale di oltre 229.000 caratte¬ 
ri. Ogni file può essere caricato in 
5 secondi. Ricerca velocissima. 
Campi determinabili dall’utente. 
Possibilità di editing sofisticato. 
Dischetto e manuale offerti in ele¬ 
gante confezione a sole 60.000 
lire. 


APPLE GAMES. 11 giochi: Flip-Flop, 
Mastermind, Towers, Sherlock’s home, 
Attack of thè Zargons, Phaser Practice, 
Acey-Ducey, Big government, Tic-Tac- 
Toe, Qubic, Depth charge. E tre pro¬ 
grammi di utilità: Shape table generator, 
Opening ceremonies, Master catalog. 
Per alcuni giochi sono richieste le padd¬ 
le o il joystick. Dischetto con program¬ 
ma e manuale in elegante confezione a 
60.000 lire. 



APE ESCAPE. Una scimmia è 
fuggita dallo zoo e si arrampica di 
finestra in finestra lungo le pareti 
di un grattacielo. Elicotteri le ron¬ 
zano attorno e il guardiano dello 
zoo la insegue. Riuscirà a rag¬ 
giungere il tetto e la libertà? Gra¬ 
fica a colori. Dischetto con pro¬ 
gramma e manuale in elegante 
confezione a sole 50.000 lire. 


BERMUDA RACE. Un’esaltànte 
regata nella quale voi siete al co¬ 
mando di una barca con quindici 
uomini d’equipaggio. Tutto di¬ 
pende dalla vostra abilità di skip¬ 
per. Il programma è ampiamente 
documentato su Applicando n. 
17, Giugno 1985. Dischetto con 
programma e manuale in elegan¬ 
te confezione a 50.000 lire. 


CAVES OF OLYMPUS. Oltre a 
una grafica a colori ultraprofes¬ 
sionale, questo gioco di abilità 
sfodera suoni ed effetti speciali di 
qualità nettamente superiore. Di¬ 
vertente, intrigante e irresistibile. 
Dischetto con programma e ma¬ 
nuale in elegante confezione a 
sole 50.000 lire. 


MUSIC GAMES. 12 programmi 
educativi e divertenti sul filo delle 
7 note. Senza bisogno d’altro, il 
vostro Apple si tramuterà in un 
docile strumento musicale dal 
quale imparare e col quale diver¬ 
tirsi. Sono richieste le paddle o il 
joystick. Dischetto con program¬ 
ma e manuale in elegante confe¬ 
zione a sole 50.000 lire. 


REGATTA. Un gioco entusiasmante che 
farà impazzire marinai esperti e meno 
esperti di qualunque età. Ogni concor¬ 
rente ha a disposizione una barca e un 
circuito. Poi ci sono i venti, gli ostacoli, 
gli imprevisti... Una grafica realistica vi 
farà volare tra le onde. Il programma è 
ampiamente documentato su Applican¬ 
do n. 17, Giugno 1985. Dischetto con 
programma e manuale in elegante con¬ 
fezione a sole 50.000 lire. 
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Prefix, Subdirectory, Pathname? Sono termini che 
bisogna conoscere per programmare in ProDOS. Questa 
utility non solo aiuterà a capire e imparare con facilità, ma, 

soprattutto... 


DOS 3.3 


ProDOS A 

Pilli 

APPLE //e A 

Pilli 

APPLE //c -i 

Pilli 


Tutti i segreti 
dietro il Pathname 



giornati dallo stesso computer (fatta 
eccezione per le necessarie regolazioni 
dell’orologio, che debbono essere fat¬ 
te tramite tastiera e l’apposito soft). 

Se invece non avete una 
scheda—orologio, la data e l’ora deb¬ 
bono essere inserite di volta in volta 
tramite la tastiera e quindi, quando si 
fa partire il PROMENU, si leggerà sul 
video la data e l’ora precedentemente 


P er scrivere programmi in Pro¬ 
DOS è necessario imparare una 
nuova terminologia come Pathname, 
Directory, Subdirectory e così via. Per 
coloro che si dilettano con la program¬ 
mazione, imparare questa terminolo¬ 
gia è utile e necessario, ma è diverso 
per coloro che devono soltanto usare i 
programmi e che, giustamente, posso¬ 
no fare a meno di simili informazioni. 
Per questi ultimi, si tratta solo di far 
girare facilmente un programma senza 
essere costretti a imparare nessun ter¬ 
mine tecnico. Il PRÒMENU è lo stru¬ 
mento ideale per proporre una gestio¬ 
ne semplificata dei programmi che 
consente di leggere le directory, e se 
occorre anche le subdirectory, e di sce¬ 
gliere poi un programma da eseguire 
senza richiedere una conoscenza spe¬ 
cifica della giusta sintassi dei comandi 
del ProDOS. La spiegazione del fun¬ 
zionamento di PROMENU potrà poi 
anche chiarire molti interrogativi sulle 
directory del ProDOS, e mostrare 
qualche tecnica d’impiego delle direc¬ 
tory nei programmi. 

La data e l’ora 

Quando fate girare PROMENU vi 
accorgerete che la prima videata con¬ 
tiene l’ora e la data attuale, come mo¬ 
stra la figura 1 . Se disponete della 
scheda orologio/calendario Thunder- 
clock o di un’altra scheda equivalente 
in grado di tenere il conto della data e 
•dell’ora automaticamente, questi dati 
dovrebbero essere continuamente ag¬ 


impostate nel corso dell’ultima volta 
che è stato usato il programma. Oppu¬ 
re, se non era mai stato inserito alcun 
dato in precedenza, apparirà: 


NIENTE DATA 
e 

NIENTE ORA. 


Se la data e l’ora che appaiono sul 
video alla partenza di PROMENU so¬ 
no esatte, battendo il tasto N indiche¬ 
rete al computer che non avete biso¬ 
gno di aggiornare i dati. Se invece vo¬ 
lete variare o inserire la data e l’ora 
dovrete battere il tasto S e saranno 

Figura 1. Videata iniziale di partenza. 


* < DAT A > PROMENU <ORA> t 

* $ 

t £ 

DATA E ORA IMPOSTATE 

DAT A : <NIENTE DATA> 

ORA = <NIENTE ORA> 


UUOI AGGIORNARE DATA E ORA? S-N 




































Listato 1 


10 

REM 

*********************** 

20 

REM 

* PROMENU * 

30 

REM 

* DI ROYCE BACON * 

40 

REM 

* COPYRIGHT (0 1985 * 

50 

R0i 

* BY APPLICANDO 4 * 

40 

REM 

* MICR0SPARC, INC. * 

70 

REM 

*********************** 

80 

DEF 

c 

FN M9(X) = X - < INT <<X - 

90 

DI = 

CHRI (4) 

100 

FALSE = (0 = DìTRUE = (1 = 1) 


110 DIM SUBK5I): REM NOMI DELLE SUBDIRECTORY 
120 DIM PGMK51): REM NOMI DEI PROGRAMMI 

130 BELLI = CBR! (?) 

140 GOSUB 3540: REM RICEVE PREFIX PRIMO LIVELLO 

150 Lll = PREFIX*: REM SALVA PREFIX LIVELLO ALTO (continua) 


* <DATA> PROMENU <ORA> % 

* % 

:* t 

DATA E ORA IMPOSTATE : 


DATA : <NIENTE DATA> 
ORA = <NIENTE ORA> 
DATA: 28-GIU-85 
INTRODUCI ORA = 03=45 PM 


ESATTO? S/N 


Figura 2. Introduzione data e ora. 


che si possa correggere l’errore. 

Per maggiore certezza alla fine del¬ 
l’inserimento della data e dell’ora rice¬ 
verete però la richiesta di confermare i 
dati presenti sullo schermo. In caso 
affermativo non vi resta che battere S, 
mentre con il tasto N avrete la possibi¬ 
lità di modificare uno dei dati. 

Se il vostro sistema è dotato della 
scheda orologio/calendario Thunder- 
clock (o scheda equivalente), il PRO¬ 
MENÙ vi chiede se volete aggiornare 
la data e l’ora. Con S avrete le sinteti¬ 
che istruzioni per effettuare l’aggior¬ 
namento richiesto, mentre con N non 
richiedete alcun aggiornamento e il 
programma prosegue. Per maggiori 
chiarimenti sulla procedura di aggior¬ 
namento della data e dell’orario dove¬ 
te consultare il manuale che vi è stato 
fornito insieme alla scheda, dove tro¬ 
verete anche le istruzioni dettagliate 
per la regolazione dell’orologio. 

Per il Thunderclock è importante 
che il commutatore SET ENABLE/ 
PROTECT dell’orologio sia nella po¬ 
sizione SET ENABLE. In caso con¬ 
trario non potrete aggiornare l’orario. 

La data e borano saranno utilizzate 
da PROMENU quando si crea o si 
aggiorna un file: verranno messe nella 
directory del file e rimarranno tali fino 
a quando non saranno reimpostate (da 
voi manualmente o automaticamente 
dalla scheda Thunderclock). 

La scelta 
di una directory 

Una volta impostate la data e l’ora 
siete pronti per selezionare una direc¬ 
tory e un programma. Il primo passo è 


visualizzate queste due righe: 


INTRODUCI DATA: 
GG-MMM-AA 

INTRODUCI ORA: 00:MM AM 


Come si vede la data deve essere 
inserita con due cifre per il giorno 
(GG) seguite dall’abbreviazione del 
mese formata da tre caratteri e da due 
cifre per l’anno. L’orario deve essere 
invece inserito con due cifre per le ore 
(che non superino il 12), due cifre per i 
minuti e la sigla AM o PM, rispettiva¬ 
mente per le ore antimeridiane e po¬ 
meridiane (01-12 e 13-24). L’inseri¬ 
mento dei dati non presenta alcun pro¬ 
blema, poiché il cursore di inserimen¬ 
to si posiziona automaticamente sul 
dato da inserire e, in caso di errore, 
torna all’inizio del dato errato in modo 


ttttttttttttttttttttttttttttttttttttttt 
t 28-GIU-85 PROMENU 03:45 PM % 

I SUBDIRECTORY PROGRAMMA t 
ttttttttttttttttttttttttttttttttttttttt 
PREFIX: /PROFILE/ 


BLOCKS FREE: 8216 


BLOCKS USED: 1512 


RETURN = DIRECTORY PER PREFIX CORRENTE 

1 = UTILITY/ 

2 = ACS/ 

3 = FATTURE/ 

4 = APW/ 

5 = A/ 

6 = PGR/ 

7 = B/ 

8 = C/ 

9 = 0 / 

8 = E/ 


PREMI UN NUMERO PER UN'ALTRA DIRECTORY 
O —> PER UEDERE PAGINA 2 DI 2 
O ? PER AUERE AIUTO 


Figura 3. Elenco subdirectory pag. 1. 
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La MT/80+ e la PC dispongono di 
interfacciamento parallelo e seriale che permette 
di connettere questi prodotti a qualsiasi Micro o PC. 
Per la stampa a basso costo, le stampanti della 
famiglia MT/80 sono perfette, rispondendo ad 
ogni tua necessità di stampa. 

La velocità di stampa é a 100 o 130 cps. con una 
matrice estremamente chiara e pertanto ideale 
per stampare i tuoi listati, le tue lettere ecc. 

Le stampanti della famiglia MT/80 
oltre che trascinare la carta con 
trattori di spinta consentono 
anche, per mezzo della frizione, di 
inserire il foglio singolo. 

Le MT/80 sono belle a vedersi, 
facili da usare, non richiedono 
manutenzione preventiva, 
silenziose ed in più la versione 80 
PC é completamente 
compatibile con il tuo PC IBM. 





MANNESMANN 

TALLY 


20094 Corsico (MI) - Via Cadamosto, 3 
Tel. (02) 4502850/855/860/865/870 - Telex 311371 Tally I 
00137 Roma - Via I. Del Lungo, 42 - Tel. (06) 8278458 
10099 San Mauro (TO) - Via Casale, 308 - Tel. (011) 8225171 
40050 Monteveglio (BO) - Via Einstein, 5 - Tel. (051) 832508 


adverteam 












I 


la scelta di una directory. Vi verrà pre¬ 
sentata una videata simile a quella mo¬ 
strata nella figura 2. 

Nel menù delle subdirectory, la se¬ 
sta e la settima riga della videata indi¬ 
cano sempre il prefix (directory) che è 
attualmente attivo. Inizialmente si 
tratterà del nome del disco, ma in se¬ 
guito, dopo la selezione delle subdi¬ 
rectory, conterrà anche il nome (o i 
nomi) della (o delle) subdirectory. Le 
informazioni sul numero dei blocchi, 
liberi e utilizzati, sono contenute nel¬ 
l’ottava riga. Nel mezzo dello schermo 
riceverete una lista delle directory del 
disco. La colonna sulla sinistra indica 
il tasto da premere per scegliere quella 
directory, e la colonna di destra indica 
il nome della directory. Le istruzioni 
sono visualizzate in basso sullo scher¬ 
mo. 

Per scegliere la directory/subdirec¬ 
tory corrente dovete soltanto premere 
il tasto RETURN. Per scegliere una 
delle subdirectory listate dovete inve¬ 
ce premere il tasto indicato sullo 
schermo. 

Se nel disco (volum) ci sono più di 
10 directory, potete procedere di pagi¬ 
na in pagina della lista premendo la 
freccia destra per cambiare pagina. 
Premendo la freccia destra quando 
siete arrivati all’ultima pagina tornere¬ 
te automaticamente a pagina 1. Per 
avere ulteriori aiuti nella selezione dei 
file potete ricorrere al punto interro¬ 
gativo (?) che vi permetterà di avere le 
istruzioni sul video delle varie possibi¬ 
lità offerte da PROMENU. 

Anche il tasto ESC ha una funzione 
ben precisa: quando avete sullo scher¬ 
mo le directory, premendo il tasto 
ESC potrete uscire dal programma e 
tornare in Basic. Se invece è visualiz¬ 
zato l’elenco dei programmi, il tasto 
ESC vi farà tornare alla visualizzazio¬ 
ne delle directory. 

Dovrete continuare questo procedi¬ 
mento fino a quando non avrete rag¬ 
giunto la subdirectory voluta. In caso 
di errore, se scegliete per esempio una 
subdirectory "vuota", il programma vi 
riporterà automaticamente alla videa¬ 
ta di selezione del programma. 

La scelta 

di un programma 

Quando avete scelto sulla lista una 
directory/subdirectory, o quando una 
subdirectory non ha altre subdirecto¬ 
ry, riceverete un display simile a quel¬ 
lo della figura 3. 

Come nel menù delle subdirectory, 
le righe dalla sesta all’ottava conten¬ 


do BL* = ‘ s : FOR 1 = 2 70 38:BL$ = BL$ * * NEXT 1 
170 SI* = ■*': FOR 1 = 2 T0 39:51$ = SI* ♦ NEXT I 
180 52$ = 4 LEF7$ <BL$,37) 4 

190 MQ$ = " , ??GENFEBHARAPRMAG61ULUGAGOSET0TTNOyDIC'' 

200 GOSUB 340: REM RICEVE ORA E DATA CORRENTI 
210 GOTO 1920 
220 REM 

230 REM - VISUALIZZA INTESTAZIONE - 
240 REM 

250 TEXT : HOME : SPEED= 255 
260 PRINT 51$: PR1NT 52$ 

270 PRINT 52$ 

280 PRINT 52$: PRINT 51$ 

290 VTAB 2: HTAB 3: PRINT DT$;: HTAB 17: PRINT ■PROMENU"; 
300 VTAB 2: HTAB 29: PRINT TIME$; 

310 POKE 34,5 
320 HOME 
330 RETURN 
340 REM 

350 REM - LEGGE DATA SISTEMA - 
3óG REM 

370 DD = PEEK (49040) - 1NT ( PEEK (49040) / 32) * 32 
380 YY = JNT ( PEEK (49041) / 2) 

390 ff! = ( PEEK (49041) - YY * 2) * 8 4 1NT ( PEEK (49040) 

! 32 > 

400 m = MID$ (M0$,MM * 3 4 1,3) 

410 REM 

420 REM - LEGGE ORA SISTEMA 
430 REM 

440 MI = PEEK (49042) 

450 HH = PEEK (49043) 

460 REM 

470 REM - CONVERTE DA 24 ORE A 12 
480 REM 

490 IF HH > 11 7HEN PM = 1 

500 IF HH > 12 THEN HH = HH - 12 * 

510 IF HH = 0 THEN HH = 12 

520 IF DD = 0 THEN DT$ = ‘(DATA)":TIME$ = “ <0RA>": RETU 

RN 

530 DT$ = RI6HT$ COO" 4 STO* (DO),2) 4 ■-* 4 MM* 4 *-■ 4 
RIGHT$ C00* + STR$ (YY) ,2) 

540 TIME* = R1GH7$ C00’ 4 S7R$ <HH),2) 4 4 R]GHT$ ( 

■00* 4 STRI (MI),2) 


t 28-GIU-85 PROMENU 03=45 PM * 
t t 
t SUBDIRECTORY PROGRAMMA * 
ttttttttttttttttttttttttttttttttttttttt 
PREFIX= /PROFILE/ 

BLOCKS FREE : 8216 BLOCKS USED= 1512 


RETURN = DIRECTORY PER PREFIX CORRENTE 

1 = F/ 

2 = G/ 


PREMI UN NUMERO PER UN'ALTRA DIRECTORY 
O --> PER UEDERE PAGINA 1 DI 2 
O ? PER AUERE AIUTO 


Figura 4. Elenco subdirectory pag. 2. 
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550 

560 

570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

670 

680 

690 

700 

710 

720 

730 

740 

750 

760 

770 

780 

790 

800 

810 

820 

830 

840 

850 

860 

870 

880 

890 

900 

910 

920 

930 

940 

950 


IF PM = 1 THEN TIMEI = TIMEI ♦ 8 PM" 

1F PM = 0 THEN T1MEI = T1MEI + ■ AM" 

RETURN 

PRINT ' DATA E ORA IMPOSTATE:" 

PR1NT : PRINT 
REM 

REM - STAMPA DATA E ORA 
REM 

PRINT 8 DATA : "• 

IF DÒ = 0 THEN PRINT "(NIENTE DATA)": GOTO 700 
IF DD < 10 THEN PRINT "0"; 

PRINT DD:"-": 

PRINT MMl:’- : 

IF YY < 10 THEN PRINT "0"; 

PRINT YY 
PRINT 

PRINT ‘ ORA : *: 

IF HH = 12 AND MI = 0 AND DD = 0 THEN PRINT *(NIENTE 0 

RA>* : GOTO 790 

IF HH < 10 TH0( PRINT "0"; 

PRINT HH:*:"; 

IF MI < iO THEN PRINT "0"; 

PRINT MI; 

IF PM = i THEN PRINT " PM" 

IF PM = 0 THEN PRINT " AH* 

VTA8 18 

PRINT ‘ VUOI AGGIORNARE DATA E ORA? S/N 
GET Al 

IF ASC (Al) ) 90 THEN Al = CHRI ( ASC (Al) - 32) 

IF (Al < ) "S") AND (Al < > “N") THEN PRINT BELLI;: 
GOTO 810 

(/TAB 18: HTAB 2: PRINT BLI 
IF Al = *N“ OR Al = "N" THEN 1880 
VTA6 12: PRINT 

PRINT " INTRODUCI DATA: GG-ftW-AA* ; 

REM 

REM -LEGGE GIORNO IN DO 
REM 

HTAB 20: PRINT u 66 8 :: HTAB 20 

GET Al: IF <A$ < C 0U OR (A$ > D 3 B ) GOTO 910 

OD = MAL (A$): PRINT Al; 

GET A*: IF <A$ < 8 0 fi ) OR (A$ > n 9 8 ) GOTO 910 

DD = DD * 10 ^ UAL <A*): PRINT A*; ( • 


gono il prefix e lo stato di spazio del 
dischetto. La sezione centrale dello 
schermo mostra una lista dei file (pro¬ 
grammi) della directory selezionata. 
La colonna uno è il tasto relativo a 
questo file; la colonna due mostra il 
nome del programma. La presenza di 
un asterisco (*) davanti al nome indica 
che il programma/file è protetto. La 
colonna tre riporta il tipo di file. L’ulti¬ 
ma colonna indica la data e l’ora del¬ 
l’ultima modifica del file. Anche in 
questo caso alla base dello schermo 
sono visualizzate le istruzioni. . 

Per scegliere uno specifico pro¬ 
gramma dovete premere il tasto relati¬ 
vo a quel programma. Noterete che 
l’ultima voce non è in realtà un pro¬ 
gramma, ma un’opzione di uscita sul 
Basic con il prefix della subdirectory 
corrente. La freccia destra e il punto 
interrogativo (?) funzionano come nel 
display della directory. Il tasto ESC vi 
farà tornare alla visualizzazione delle 
directory del disco. Ciò può essere uti¬ 
le se il programma voluto non è nella 
lista mostrata ma in un’altra directory. 


L’introduzione 
del programma 

Per digitare il PROMENU basta in¬ 
trodurre il programma visibile nel li¬ 
stato 1. Per far girare automaticamen¬ 
te il PROMENU salvate il programma 
con il nome STARTUP nella directory 
principale del disco. Per farlo basta 
battere: 


PREFIX, S6, DI 
SAVE STARTUP 


**************************************** 
* 28-GIIJ-35 PROMENU 03 = 45 PM | 

! DIRECTORY PROGRAMMA 

t**ttt*****Z*tZ%Z*t*t*1t '-**************** 
PREFIX = /PROFILE/PGR,'’ 

BLOCKS FREE = 3216 BLOCKS USED= 1512 


HUM 

PROGRAMMA 

TYP 

MODIFICATO 

1 

INFERMO.SHAPES 

SIN 

8-MAY-35 

0 

00 

2 

INFERNO.OBJ 

BIN 

3-MAY-35 

0 

00 

3 

POMPIERI 

BAS 

3-MAY-85 

0 

00 

4 

CIRCUITO 

BIN 

3-MAY-35 

0 

00 

5 

DESIGNER 

BAS 

10-MAY-85 

0 

00 

fe 

ThUOLA.PROGRAMM 

BIN 

3-MAY-35 

0 

00 

-? 

f 

TAUOLA.ELETTRON 

BIN 

8-MAY-35 

0 

00 

8 

PRETTYLISTER.AS 

BIN 

3-MAY-35 

0 

00 

9 

PRETTYLISTER. IT 

BAS 

3-MAY-35 

0 

00 


FREMI UN NUMERO SE UUOI UN PROGRAMMA 
O —> PER UEDERE PAGINA 2 DI 5 
O ? PER AUERE AIUTO 


Figura 5. Elenco programmi di una subdirectory. 


Il primo comando assicura che il 
prefix sia impostato sul nome del di¬ 
schetto che si trova nel drive 1. Il nome 
STARTUP viene impiegato affinché il 
ProDOS faccia girare automaticamen¬ 
te questo programma ogni volta che si 
fa il booting del disco. Il programma 
STARTUP è l’equivalente del pro¬ 
gramma HELLO del DOS 3.3. Il disco 
deve contenere i normali file ProDOS 
e BASIC.SYSTEM perché si possa fa¬ 
re il booting e l’esecuzione del pro¬ 
gramma STARTUP. 

NOTA IMPORTANTE: dopo aver 
introdotto STARTUP, non dimenti¬ 
cate di salvarlo con SAVE prima di 
scegliere un programma da far girare, 
perché altrimenti perderete la versio¬ 
ne corrente di STARTUP. Ai fini del 
debugging si ricorra a un’istruzione 
STOP alla linea 2040 per impedire che 
venga effettivamente caricato il pro¬ 
gramma selezionato. 
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L’impiego 
del programma 

Se volete far girare PROMENU 
senza fare il booting di un disco Pro- 
DOS dovete assicurarvi che il prefix 
del ProDOS sia impostato sul nome 
del disco (volum). Il modo più facile 
per farlo consiste nel battere il coman¬ 
do PREFIX,S6,D1. In questo modo 
imposterete il prefix uguale al nome 
del disco che si trova nel drive 1. Poi 
potrete far girare il programma digi¬ 
tando STARTUP dal prompt del BA¬ 
SIC. 

Come funziona 
il programma 

PROMENU legge in effetti i file 
della directory ProDOS come file di 
dati per procurarsi le informazioni oc¬ 
correnti per costruire i display. 

Le linee 10-210 del PROMENU 
sono istruzioni introduttive che svol¬ 
gono funzioni di inizializzazione. La 
funzione contenuta nell’istruzione 80 
memorizza nelle matrici SUB$ e 
PGM$ rispettivamente i nomi di sub¬ 
directory e di programma. La linea 
210 salta alla routine principale di con¬ 
trollo per aggirare le subroutine comu¬ 
ni che seguono. 

Le linee 220-330 contengono una 
subroutine che visualizza l’intestazio¬ 
ne comune e imposta il margine supe¬ 
riore alla riga 5, per impedire che l’in¬ 
testazione venga eliminata dallo 
schermo. 

Le linee 340—1880 sono le routine 
di visualizzazione/impostazione della 
data e dell’ora. Queste routine sono 
modellate su quelle che si trovano nel 
programma di menù del ProDOS 
USERS.DISK dell’Apple, ma hanno 
qualche funzione in più. Le linee 
340—450 ricavano la data e l’ora cor¬ 
renti dalle locazioni nelle quali il Pro¬ 
DOS le memorizza. 

Le linee 460—560 normalizzano le 
indicazioni orarie adattandole all’oro¬ 
logio di 12 ore e gestiscono la situazio¬ 
ne nei casi in cui non è stato impostato 
alcun valore. Questa routine ritorna 
con la data in DT$ e con l’ora in 
TIMES. Le linee 580-780 visualizza¬ 
no la data e l’ora correnti. Le linee 
790—850 determinano se si desidera 
cambiare la data e l’ora. 

La linea 820 converte gli eventuali 
caratteri minuscoli introdotti in carat¬ 
teri maiuscoli, sottraendo 32 dal valo¬ 
re ASCII del carattere. Questo per- 


960 IF DO > 31 OR DD < ! GOTO 910 
970 REM 

980 REM RICEVE MESE IN MI* 

990 REM 

1000 1F ASC (A*) = 2? THEN 860 

1010 HTAB 23: FRINÌ ■JMI'j: HTAB 23:C0UNT = 1:M1* = 

1020 SET A*: IF ASC (A*) > 96 THEN A* = CHR* < ASC (A*) - 
32) 

1030 MI* = MI* + A*::MM = 4 
1040 IF MI* = MIO* <M0*,ff1 t COUNT> THEN GOTO 1070 
1050 MM = HM + 3: IF MM < 39 THEN GOTO 1040 
^060 GOTO 1000 

1370 D R!NT A*;:C0LNT = CGUNT ♦ 1: IF C0LNT < 4 THEN GOTO 1 
020 

1 ORO W = erti - 1) / 3 
1090 REM 

1100 REM -LEGGE ANNO IN YY 
1110 REM 

1120 IF ASC (A*) = 27 THEN 860 

1130 HTAB 27: PR1NT *AA"; : HTAB 27 

1140 SET A*: IF (A* < *G‘) OR (A* > “9“) GOTO 1120 

1150 YY = VAL <A*): PRINT A*; 

1160 GET A*: IF (A* < “0") OR (A* > "9') GOTO 1120 
1170 YY = YY * 10 + VAL (A*): PRINT A* 

1180 VTAB 13: HTAB 4: PRINT * 

1190 VTAB 15: HTAB 4: PRINT “INTRODUCI ORA : 00:MM AM*; 
1200 REM 

1210 REM -LEGGE ORA IN HH 


1220 

1230 

1240 

1250 

1260 

1270 

1280 

1290 

1300 

1310 

1320 

1330 

1340 

1350 

1360 

1370 

1380 

1390 

1400 

1410 

1420 

1430 

1440 


1450 

1460 

1470 

1480 

1490 

1500 

1510 

1520 

1530 

1540 

1550 

1560 

1570 

1580 


REM 

HTAB 20: PRINT “00“:: HTAB 20 

GET A*: IF (A* < "CU OR (A* ) T) GOTO 1230 

HH = VAL (A*): PRINT A*; 

GET A*: IF (A* < “0") OR'(A* > ”9") GOTO 1230 
HH = 10 * HH + 'VAL (A*): PRINT A*; 

IF HH > 12 OR HH < 1 GOTO 1230 
REM * 

REM -LEGGE MINUTI IN MI 

REM 

IF ASC (A*) = 27 THEN 1190 

HTAB 23: PRINT “MM';: HTAB 23 

GET A*: IF (A* < “0') OR (A* > *5“) GOTO 1320 

MI = VAL (A*): PRINT A*; 

GET A*: IF (A* < T) OR'(A* > ”9*) GOTO 1320 
Mi = 10 * MI + 'VAL (A*): PRINT A*: 

IF MI >59 GOTO 1320 
REM 

REM -RICEVE AM 0 PM 

REM 

IF ASC <A*) = 27 THEN 1190 
HTAB 27 


GET A*: IF <A* < > “A") AND (Al < > V) AND (A* < 

> "P") AND (A* < > V) AND (A* < > “ *> AND (A* < 

> CHR* (13)) GOTO 1420 

IF (A* = “P") OR (A* = V) THEN PRINT “P“: 

REM 

REM -RIPETE FINCHE" ESATTO 


REM 

'VTAB 18: HTAB 2: PRINT “ ESATTO? S/N 

GET P* 

IF ASC (PI) > 90 THEN PI = CHR* ( ASC (PI) - 32) 

IP (P* < > “S") AND (P* < > ■N*> THEN PRINT BELL*;: 
GOTO 1500 

VTAB 18: HTAB 2: PRINT BL* 

IF P* < > *S* THEN 860 
VTAB 15: HTAB 8: PRINT “ 

REM 

REM -AGGIORNA DATA SISTEMA 
REM 
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1599 POKE 49041,YY * 2 ♦ (MI > 7) 

Ì800 !F m > 7 THBt POKE 49048,(MM - 8) * 32 + DO 
SO !F MM < 8 THEN POKE 49040,MM * 32 + DD 
1620 REM 

1830 REM -AGGIORNA ORA SISTEMA (OROLOGIO 24 ORE) 

1840 REM 

1850 IF HH = 12 THEN HH = 0 

1880 1F Al = H P‘ OR Al = V THEN HH = HH + 12 

1878 POKE 49043.HH: POKE 49042.MI 

1880 G0SU6 340: VTA8 2: HTAB 3: PR3NT DTI;: HTAB 29: PRINT 
TIME*: 

1890 VTAB 18 : PRINT * DATA E ORA SISTEMA AGGIORNATE": 
PRINT 

17O0 FLAG = PEEK <49048): REM RICEVE FLAG CHE INDICA SE 
C'E' THUNDERCLOCK 

1710 IF INT < FLAG / 2) = FLAG / 2 THEN 1870: REM SE BIT= 

Off NIENTE OROLOGIO 1720 PRINT ‘AGGIORNI SCHEDA OROL 
0610/CALENDARIO’ 7 S/N 
1730 GET Ul 

1740 IF ASC (LH) > 90 THEN II = CHRI < ASC (Ul) - 32) 

1750 IF Ul < > *S* AND Ul ( > "N" THEN PRINT BELLI;: GOT 
0 1730 

1755 IF Ul = “N" THEN 1940 

1780 HOME : PRINT "METTI IL COMMUTATORE PROTECT/ENABLE 
DELLA SCHEDA OROLOGIO SULLA POSIZIONE SET-ENABLE" 

1778 PRINT : INPUT ‘IN CHE SLOT E' LA TUA SCHEDA OROLOGIO 7 
" :C5I: IF LEN (CSI) > 1 OR CSI < "2“ OR CSI > "7" THE 
N ORINT BELLI ;“SLOT NON VALIDO": GOTO 1770 
1780 PRINT : PRIN T "INTRODUCI DATA E ORA COME M S GG 00 MI 
SS,DOVE rffcMESE, S= GIORNO DELLA SETTIMANA (0= 

D0M1-LUN. 2=MAR T , 3=MER, 4=510, 5=VEN, 8=SAB), GG=GI 
ORNO, 00=ORE,M!=MlN l SS=SEC" 

1790 PRINT : PRINT • S GG 00 MI SS": IF (Al = "P" A 

ND HH < 123 THEN HH = HH * 12 

1880 SI = RIGHTI ("C 8 + STRI <MN).2> ♦ " U " + RIGHTI C 
O" * STRI (OD),2) + " * 4 RIGHTI CO* 4 STRI (HH),2 
) + " ’ + RIGHTI ("0“ + STRI (MI),2) 4 ‘ 00" 

1810 PRINT 'ORA 7 •■SI:: HTAB 7: INPUT "":SI 
I820 PRINT DIj’PRlr :CSI: PRINT D*:"INf":CSI: PRINT 
INPUT “/* :TI: PRINT DI:“PRfO 4 : PRINT DI;"1N£0“ 

1830 PR!N T : PRIN T "DATA “;TI:“ E ORA SONO QUELLE GIUSTE 7 ( 
S/N) *; 

1840 SET YNI: IF ASC (YNI) > 90 THEN YNI = CHRI ( ASC CYN 
I) - 32) 

1B50 IF YNI < > "S" AND YNI < > "N" THEN PRINT BELLI;: G 
OTO 1840 

1880 IF YNI = "N" THEN GOTO 1780 
1876 HOME 

1880 RETURN 

1890 REM 

1950 REM *** ROUTINE PRINCIPALE *** 

S910 REM 

1920 GOSUB 250: REM VISUAL IZZA INTESTAZIONI 

1930 GOSUB 580: REM FA ROUTINE DATA 

1940 FRINÌ Dij'PREFIX 'jPREFIXI 

1950 DN = FALSE 

1980 GOSUB 2O90: IF NOT DN THEN 1960: REM FA ROUTINE SUB 
DIRECTORY 

1970 IF ORI = CHRI (27) AND PREFIXI = Lll THEN TEXT : HOM 
E : END 

1980 IF OFI = CHRI (27) THEN HOME : GOSUB 3570: GOTO 1940 
1990 DN = FALSE 

2OO0 GOSUB 2840: IF NOT DN THEN 2000: REM FA ROUTINE DIR 
ECTQRY 

2O10 IF ORI = CHRI (27) THEN HOME : GOSUB 3540: GOTO 1940 
2029 IF POH = ‘-BASIC-’ THEN TEXT : HOME : END 
2039 TEXT : HOME : VTAB 12: HTAB 1: PRINT "STO CARICANDO 
POMI 

(continua) 


mette a chi ha un Apple //e l’impiego 
delle minuscole. 

Le linee 870—1180 procurano la 
nuova data. Si noti come ogni caratte¬ 
re introdotto venga convalidato, e co¬ 
me l’introduzione torni all’inizio del 
campo se si incontra un errore. L’in¬ 
troduzione del mese viene convalidata 
a confronto con le abbreviazioni stabi¬ 
lite in MO$ a linea 190. La nuova ora è 
procurata dalle linee 1190—1450. È 
una bella quantità di listato per intro¬ 
durre la data e l’ora, ma rende quasi 
impossibile sbagliare l’introduzione. 
Le linee 1460—1550 verificano che la 
nuova data sia giusta. 

La linea 1510 riconverte in maiusco¬ 
lo qualsiasi carattere minuscolo intro¬ 
dotto. Infine le linee 1560-1690 scri¬ 
vono con POKE la data e l’ora nuove 
nelle locazioni di memoria del Pro- 
DOS. 

Le linee 1700-1710 controllano un 
flag esistente nella locazione di memo¬ 
ria 49048 che indica se sia presente un 
Thunderclock. Se il bit 0 è off non c’è 
orologio, mentre se il bit 0 è on c’è 
l’orologio. Le linee 1720—1820 ricava¬ 
no le informazioni necessarie per im¬ 
postare il Thunderclock e poi lo impo¬ 
stano. Le linee 1830—1860 verificano 
che data e ora siano state impostate 
nel modo giusto. 

Le linee 1890-2050 contengono la 
routine principale che controlla il flus¬ 
so del programma. La variabile DN 
contiene un valore logico di VERO o 
FALSO, ed è usata per provare se una 
determinata routine sia finita. I valori 
per VERO e FALSO sono impostati a 
linea ÌOO. La linea 2050 utilizza il co¬ 
mando di trattino del ProDOS (-), 
che farà girare qualunque tipo di pro¬ 
gramma. Questo elimina la necessità 
di controllare il tipo di programma e di 
emettere i comandi RUN o BRUN. 

Nota: ProMENU tenterà di esegui¬ 
re qualsiasi tipo di file ma spetta all’u¬ 
tente a^ertare che il file sia effettiva¬ 
mente eseguibile. Due esempi di pro¬ 
grammi che non si riuscirà a eseguire 
sono costituiti dai file binari che ven¬ 
gono caricati nello spazio di program¬ 
ma del BASIC e dai file di testo che 
non contengono istruzioni eseguibili 
con EXEC. 

Lettura di untile 
delia directory 

Le directory del ProDOS sono file 
di dati sequenziali come gli altri file 
sequenziali. Il contenuto dei file è 
esattamente, riga per riga, quel che si 
vede quando si usa il comando CATA- 
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LOG. Di mano in mano che i file ven¬ 
gono creati, eliminati o modificati, il 
ProDOS aggiorna i file della directo¬ 
ry. È possibile leggere un file della 
directory ed elaborarlo proprio come 
un normale file di dati sequenziale, 
sempreché vengano rispettate certe 
convenzioni. La spiegazione che segue 
getterà un po’ di luce sul modo in cui 
leggere i file delle directory. 

Le linee 2060—2680 gestiscono la 
scelta di una directory/subdirectory. 
Le linee 2090-2190 leggono la direc¬ 
tory per ricevere i nomi dei file delle 
subdirectory, e visualizzano le infor¬ 
mazioni fino a quando viene scelta una 
directory. Si noti che la linea 2110 fa 
uscire immediatamente se non esisto¬ 
no subdirectory nella directory cor¬ 
rente. La linea 2180 imposta il prefix 
del ProDOS sulla directory seleziona¬ 
ta prima di ritornare alla routine di 
controllo. 

Le linee 2200— 2420 leggono una di¬ 
rectory e salvano i nomi delle subdi¬ 
rectory nella matrice SUB$. La linea 
2280 apre con OPEN il file della direc¬ 
tory per il trattamento. Quando si 
apre un file di directory, il nome della 
directory deve avere una barra (/) all’i¬ 
nizio e alla fine del nome, a indicare 
che non deve essere aggiunto al nome 
dato il prefix corrente. Si noti anche 
che occorre il parametro del tipo (TY- 
PE), TDIR, per la lettura di un file di 
directory. 

La linea 2300 usa 51 quale limite 
FOR, perché una directory può conte¬ 
nere un massimo di 51 record. La linea 
2320 elimina le righe bianche in una 
directory. La linea 2330 controlla la 
presenza del record dei BLOCCHI 
LIBERI, che è sempre l’ultimo record 
di un file di directory, e termina la 
lettura a quel punto. La linea 2340 
elimina tutti i record a eccezione dei 
file di directory. La linea 2360 esclude 
gli spazi vuoti di coda dal nome della 
directory in modo che la linea 2370 
possa aggiungere una barra (/) alla fine 
del nome della directory. 

Poi le linee 2430—2680 visualizzano 
le informazioni della directory e rica¬ 
vano la scelta dell’opzione fatta dall’u¬ 
tente. Le voci di opzione possibili sono 
controllate e trattate nelle linee 
2610-2640. Nelle linee 2650-2660 
WINDEX è impostato sull’indice del¬ 
la directory selezionata. A linea 2670 
viene suonato il campanello e viene 
ignorato il tasto se indica una directory 
vuota. Le linee 2690—2800 visualizza¬ 
no la schermata di aiuto per il display 
della directory. 

Le linee 2810—3530 eseguono il 
trattamento per la scelta del program- 


2040 REM INSERIRE INO (STOP) IN QUESTA LINEA PER SALVARE 
IL PROGRAMMA 

2050 PRINT DI;'-';PGW: REM FA GIRARE IL PROGRAMMA SCELTO 
2060 REM 

2070 REM ROUTINE SUBDIRECTORY 
2080 REM 

2090 G0SUB 2230: REM LEGGE DIRECTORY 

2100 VTAB 4: HTAB 11: PRINT 'SUBDIRECTORY PROGRAMMA';: HOME 

2110 IF SUB = 0 THEN DN = TRUE: RETURN : REM NON ESISTONO 
SUBDIRECTORY 

2120 INDEX = 1:PG = 1:NPG = 1NT ((SUB + ?) / 10) 

2130 IF INDEX ) SUB THEN INDEX: = 1 
2140 G0SUB 2460: REM VISUALIZZA LE SUBDIRECTORY 
2150 IF 0P! = CHRI (21) THEN INDEX = INDEX + 10: GOTO 2130 
: REM PAGINA SEGUENTE 

2160 IF DPI = CHRI (13) OR 0PI = CHRI (27) THEN DN = TRUE 
: RETURN : REM ACCETTA LA SUBD!RECT0RY CORRENTE 0 ESC 

2170 PREFIX* = PREFIX* + SUBKUINDEX) 

2180 PRINT D* ; "PREFIX ”;PREFIX* 

21 PO RETURN 
2200 REM 

2210 REM LEGGE UNA DIRECTORY E SALVA LE SUBDIRECTORY IN S 
UBI 

2220 REM 

2230 HOME : VTAB 12: PRINT '...STO LEGGENDO LA DIRECTORY PE 
RPRINT : PRINT PREFIX* 

2240 FOR I = ! T0 50:SUB*<I) = ": NEXT I 
2250 SUB*<0) = PREFIX* 

2260 J2 = 1 

2270 PRINT DI; 'VERIFY 'jPREFIXi 
2280 PRINT D*:'OPEN ';PREFIX*;°,TDIR" 

2290 PRINT DI;'READ ';PREFIX* ' 

2300 FOR REC = 1 T0 5! 

2310 INPUT REC*: REM LEGGE IN RECORD DELLA DIRECTORY 
2320 IF LEN (REC*) < 5 THEN 2390 

2330 IF LEFT* (RECI,12) = 'BLOCKS FREE:' THEN BF* = LEFT* 

(REC*,40): REC = ICO: GOTO 2390 
2340 IF MIDI (REC*,18.3) < ) ‘DIR" THEN 2390 
2350 SUBIIJ2) = MIDI 'IRECl.2,15) 

2360 IF RIGHTI (SUBICJ2) .1 > = • 1 THEF4 SUBKJ2) = LEFT! ( 
SUBKJ2), LEN (SUB*<J2) > - 1): GOTO 2360 
2370 SU8KJ2) = SUBKJ2) ♦ V 
2380 J2 = J2 + 1 
2390 NEXT REC 

2400 PRINT 0*;"CL0SE ”;PREFIX* 

2410 SUB = J2-1: REM NUMERO DELLE SUBDIRECTORY 
2420 RETUIft 
2430 REM 

2440 REM VISUALIZZA LE SUBDIRECTORY 
2450 REM 

2460 HOME : PRINT 'PREFIX: “;PREFIXI 

2470 VTAB 3: HTAB 1: PRINT BF*: : REM BLOCCHI LIBERI 

2480 FOR COL = 1 T0 40: PRINT NEXT COL 

2490 PRINT " RETURN = DIRECTORY PER PREFIX CORRENTE’ 

2500 FOR J3 = INDEX T0 INDEX ♦ 9 

2510 IP J3 < = SUB THEN HTAB 7: PRINT RIGHTI ( STRI <J3) 

.!):' = ';SUBI(J3) 

2520 NEXT J3 

2530 VTAB 21: HTAB 1: FOR COL = 1 T0 40: PRINT NEXT C 
0L 

2540 PRINT ' PREMI UN NUMERO PER UN'ALTRA DIRECTORY'; 

2550 IF NPG = 1 THEN PRINT ; GOTO 2590 
2560 HTAB 8: PRINT '0 --) PER VEDERE PAGINA ': 

2570 PG = INT (INDEX / 10) + 2: IF PG ) NPG THEN PG = 1 
2580 PRINT PG;’ DI ’;NPG 

25?0 HTAB 8: PRINT "0 ? PER AVERE AIUTO'; , ,. 

/mn tiri i 
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un telefono anche al tuo computer 



Personal computer CX-21 

(Chiamante) 


Centrale telefonica 


CX-21 Personal computer 
(Chiamato) 


EPSON CX-21 

Accoppiatore acustico 


L’accoppiatore acustico CX-21 del¬ 
la Epson è uno strumento conveniente e 
affidabile dalle grandi prestazioni che 
dà la nuova dimensione delle telecomu¬ 
nicazioni al vostro computer. 

Il CX-21 funziona a batterie ricarica- 
bili ed è particolarmente adatto ai per¬ 
sonal computer portatili, come il PX-8 e 
HX-20, per esempio. 

Per' accedere alle informazioni di 
una banca dati, o più semplicemente 
per comunicare con un altro computer 
basta inserire la cornetta e comporre il 
numero telefonico corrispondente. 

Leggero, compatto, elegante ed af¬ 
fidabile il CX-21 è progettato per adat¬ 
tarsi a tutti gli apparecchi telefonici e 
consentire lo scambio rapido e sicuro di 
programmi e dati. 

Caratteristiche 

- Realizzato con speciali circuiti inte¬ 
grati CMOS 

- Funzionamento a batterie NiCd ricari¬ 
cabili 

- Funzionamento full-duplex o half-du- 
plex 

- Velocità di trasmissione fino a 300 bit- 
sec. 

- Interfaccia RS 232C 

- Dimensioni 297x95x42 mm 

- Peso 700 gr. 



la voce del tuo personal 


/^EPSON^ 


EPSON - SEGI S.p.A. - Milano - Via Timavo 12 - Tel. 02/6709136 



















































ma. Le tecniche utilizzate sono prati¬ 
camente le stesse usate nella routine di 
directory/subdirectory. La linea 3040 
aggira i primi tre record che contengo¬ 
no il nome della directory. La linea 
3090 elimina i file di directory, la riga 
d’intestazione e le righe che indicano i 
nomi di directory. La linea 3150 ag¬ 
giunge l’opzione USCIRE IN BASIC 
quale ultimo nome del programma. 
Anche qui WINDEX è l’indice del 
programma scelto. Le linee 
3170-3430 visualizzano la lista dei 
programmi, ricavano la voce scelta 
dall’utente e la trattano. 

Le linee 3540-3620 ricavano il pre- 
fix corrente alla linea 3570 e poi ridu¬ 
cono il valore di prefix in PREFIX$ al 
primo livello, per esempio il nome del 
disco (volum). Lo fanno cercando la 
prima barra (/) nel prefix, e poi tron¬ 
cando via il resto del nome. 


Le possibili modifiche 

Molte delle routine e delle tecniche 
impiegate in questo programma pos¬ 
sono essere utili anche in altri pro¬ 
grammi. Le routine di visualizzazione 
e impostazione della data delle linee 
340—1880 sarebbero utili in molte si¬ 
tuazioni in cui simili informazioni sono 
importanti. Le routine di selezione 
delle directory/subdirectory potrebbe¬ 
ro essere utili in applicazioni che im¬ 
plichino il salvataggio dei dati su di¬ 
schetto. 

Chi dispone di una scheda 80 colon¬ 
ne potrà cambiare, volendo, il pro¬ 
gramma allo scopo di sfruttare questa 
caratteristica per visualizzare il record 
totale della directory. Lo si potrebbe 
fare con le modifiche indicate qui sot¬ 
to. 

1. Nelle linee 160-180 cambiare le 
dimensioni delle righe d'intestazione. 

2. Aggiungere una linea (per esem¬ 
pio la linea 205) per chiamare il modo 
a 80 colonne: oppure volendo si può 
usare il modo a 80 colonne solo in 
qualche parte del programma. 

3. Cambiare la linea 3100 in modo di 
salvare l’intero insieme di dati di re¬ 
cord della directory. 

4. Cambiare le linee 3220—3240 per 
aggiungere intestazioni per i campi ag¬ 
giuntivi. 

Se disponete di una scheda orologio 
diversa dal Thunderclock può essere 
necessario apportare modifiche alla 
routine di regolazione dell’orologio 
delle linee 1760—1860. Consultate a 
questo proposito il manuale della 
scheda orologio per avere i particolari 
sul modo di regolazione dell’orologio. 


2600 VTAB 24; HTAB 31: GE7 OP! 

2610 IP OP! = CHR$ (13) OR ORI = CHI» (27) THEN WINDEX = 

0 : RETURN 

2620 IF ih'= CHI» (21) THEN RETURN : REM PAGINA SEGUEN 
TE 

2630 IF ORI = "?" OR 01» = "/" THEN GOSUB 2700: GOTO 2430 
2640 IF ORI < "0" OR QPI ) ”9“ THEN PR1NT BELLI:: GOTO 260 

fi 

2650 WINDEX = MAL (ORI): IF WINDEX = 0 THEN WINDEX = 10 

2660 WINDEX = WINDEX + INDEX - 1 

2670 IF WINDEX > SUB THEN PR1NT BELLIi: GOTO 2600 

2680 RETURN 

2690 REM 

2700 REM VISUALIZZA AIUTO 
2710 REM 

2720 HOME : FRINÌ "QUESTA VI BEATA LISTA LE SUBDIRECTORY DEL 
PREFIX SCELTO E PERMETTE DI SCEGLIERNE UNA 0 DI SCEGL 
IERE LA DIRECTORY RELATIVA.’ 

2730 PRINT "PER SCEGLIERE LA DIRECTORY DEL PREFIX SCELTO 
("jPREFIXI;") PREMI INVERSE : PRINT ‘(RETURN)*: NO 
RftàL 

2740 PRINT : PRINT "PER SCEGLIERE UNA SUBDIRECTORY PREMI IL 
NUMERO RELATIVO ALLA SUBDIRECTORY VOLUTA (":: 1 
NVERSE : PRINT *1-0";: N0RMAL : PRINT ")" 

2750 PRINT : PRINT "SE CI SONO PIU' DI 9 SUBDIRECTORY PREMI 
INVERSE : PRINT N0RMAL : PRINT * PER VEDE 

RE LA PAGINA SEGUENTE/ 

2760 PRINT : PRINT "PREMI IL TASTO ";: INVERSE : PRINT "ESC 
N0RMAL 

2770 IF PREFIX! = Lll THEN PRINT " PER USCIRE IN BASIC": G 
0T0 2790 

2780 PRINT ' PER TORNARE ALLA DIRECTORY DEL VOLUME" 
2790 VTA8 24: HTAB 6: INVERSE : PRINT " PREMI IN TASTO PER 
CONTINUARE N0RMAL : GET GEI : PRINT 
2300 RETURN 
2810 REM 

2820 REM ROUTINE DIRECTORY 

2830 REM 

2840 GOSUB 2980: REM LEGGE LA DIRECTORY 
2850 VTAB 4: HTAB 10: PRINT “ DIRECTORY PROGRAMMA": : HOME 
2860 IF MPGM = 0 THEN 9N = TRUEtPGMI = RETURN : REM 
NESSUN PROGRAMMA NELLA DIRECTORY 
2870 INDEX = 1:PG = 1:NP6 = INT ((MPGM 4 8) / 9) 

2380 IF INDEX > MPGM THEN INDEX = 1 

2890 GOSUB 3200: REM VISUALIZZA DIRECTORY PROGRAMMI 

2900 IF ORI = CHRI (27) THEN DN = TRUE: RETURN : REM ESC 

2910 IF ORI = CHI» (21) THEN INDEX = INDEX 4 9: GOTO 2880: 

REM PAGINA SEGUENTE 

2920 PGMI = MIDI (PGMI(WINDEX),2,15) 

2930 DN = TRUE 
2940 RETURN 
2950 REM 

2960 REM LEGGE UNA DIRECTORY E SALVA I PROGRAftlI IN PGMI 
2970 REM 

2980 HOME : VTAB 12: PRINT "...STO LEGGENDO LA DIRECTORY PE 
R:.. / : PRINT : PRINT PREFIXI 
2990 F0R I = 1 T0 50:PGMI(!) = NEXT I 
3000 J2 = 1 

3010 PRINT DI;"VERIFY ";PREF1X! 

3020 PRINT DI;"OPEN "iPREFIXIi",TDIR" 

3030 PRINT DI;"READ "-PREFIXI' 

3040 POR REC = 1 T0 3: INPUT RECI: NEXT REC: REM AGGIRA N 
OME DIRECTORY 
3050 POR REC = 4 T0 51 

3060 INPUT RECI: REM RICEVE RECORD DIRECTORY 
3070 IF LEN (RECI) ( 5 THEN 3120 

3080 IF LEFTI (RECI,12) = "BL0CKS FREE:" THEN BFI = LEFT! 
(RECI,40): REC = 100: GOTO 3120 
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3090 1F MIO# (REC#,18,3) = ‘DIR 1 OR MIO# (REC#,17,4) = "T 
YPE" OR LEFT# (REC#,1) = 7* THEN 3120 
3100 PGM$(J2) = LEFT# (REO#,21) + MIDI (REC#,31,15) 

3110 J2 = J2 + 1 
3120 NEXT REC 

3130 PRIMI D#;"CLQSE ";PREFIX$ 

3140 MPGM = J2: REM NUMERO DEI PROGRAMMI 
3150 PGM#(J2) = “ -BASIC-" 

3160 RETURN 
3170 REM 

3180 REM VISUALIZZA NOMI PRGGRAftlJ E INFORMAZIONI 
3190 REM 

3200 HOME : FRINÌ ’PREFIX: "jPRFIX# 

3210 VIAB 8: HTAB 1: PRINT BF5: : REM BLOCCHI LIBERI 
3220 FOR COL = 1 IO 40: PRINT J =";: NEXT COL 
3230 PRINT "NUM PROGRAMMA IYP MODIFICATO" 

3240 PRINT " .-.“ 

3250 FOR J3 = INDEX TO INDEX + 8 

3260 IF J3 < = MPGM THEN HTAB 2: PRINT FN M9(J3);" ";PGM 
#(J3) 

3270 NEXT J3 

3280 VTAB 21: HTAB 1: FOR COL = 1 TO 40: PRINT NEXT C 
CL 

3290 PRINT 'PREMI IN NUMERO SE VUOI UN PROGRAMMA" 

3300 IF NPG = ! THEN PRINT : GOTO 3340 
3310 HTAB 8: PRINT "0 ~> PER VEDERE PAGINA *; 

3329 PG = INI (INDEX / 9) ♦ 2: IF PG ) NPG THEN PG = 1 

3330 PRINT PG:* DI ":NPG 

3340 HTAB 8: PRINT *0 ? PER AVERE AIUTO"; 

3350 VTAB 24: HTAB 31: GEI OP# 

3360 IF OP# = CHR# (27) THEN RETURN 

3370 IF OP# = CHR# (21) THEN RETURN : REM PAGINA SEGUEN 

TE 

3380 IF OP# = "?" OR OP# = "/* THEN G0SU6 3470: GOTO 3170 

3390 IF OP# < *1” OR OP# > "9" THEN PRINT BELL#;: GOTO 335 

0 

3400 «INDEX = VAL (OP#) 

3410 «INDEX = «INDEX + INDEX - 1 

3420 IF «INDEX ) MPGM THEN PRINT BELL#;: GOTO 3350 

3430 RETURN 

3440 REM 

3450 REM VISUALIZZA AIUTO PER DISPLAY PROGRAMMI 
3460 REM 

3470 HOME : PRINT "QUESTA VIDEATA LISTA TUTTI I PROGRAMMI, 

I FILE DELLA DIRECTORY E TI PERMETTE DI FAR GIRARE 
UN PROGRAMMA.‘ 

3480 PRINT : PRINT "PER FAR GIRARE UN PROGRAMMA PREMI IL 
NUMERO RELATIVO AL PROGRAM VOLUTOX" ; : INVERSE : PRI 
NT "1-9":: NQRMAL : PRINT ")" 

3490 PRINT : PRINT "SE CI SONO PIU' DI 9 PROGRAfMI/FILE PRE 
MI INVERSE : PRINT NORMAL : PRINT * PER VE 

DERE la PAGINA SEGUENTE." 

3500 PRINT : PRINT "PREMI IL TASTO ";: INVERSE : PRINT "ESC 

* 1 • NQRf'Wu 

3510 PìHnT * PER TORNARE ALLA DIRECTORY PRINCIPALE" 

3520 VTAB 24: HTAB 7: INVERSE : PRINT " PREMI UN TASTO PER 
CONTINUARE ";: NQRMAL : GET GB#: e RINT 
3530 RETURN 
3540 REM 

3550 REM RIPORTA IL PREF3X AL PRIMO LIVELLO 
3560 REM 

3570 PRINT CHR# Wi'PREFIX": INPUT PR# 

3580 LP = LEN (PREFlX#) 

3590 FOR COL = 2 TO LP 

3600 IF MI» <PREFIX#,COL, 1) = V THEN PREFIX# = LEFT# ( 
PREFlX#.COL)iCOL = LP 
3610 NEXT COL 
3620 RETURN 


Qualora vogliate includere nella li¬ 
sta soltanto certi tipi di programmi/file 
è possibile modificare la linea 3090 o 
aggiungere una linea in quella locazio¬ 
ne per limitare la lista ai tipi di file 
voluti. Per esempio può darsi che in¬ 
tendiate limitare la lista ai soli pro¬ 
grammi in BASIC. Un altro modo di 
far questo consiste nell’ usare un’unica 
directory, con un nome comune in tut¬ 
ti i dischi, per tutti i programmi in 
BASIC. In questa situazione si po¬ 
trebbe addirittura fare a meno della 
parte del programma riguardante la 
selezione delle directory, e forzare l’u¬ 
so della directory voluta impostando il 
prefix desiderato in quella routine alle 
linee 2060-2190. 


Questo programma è disponibile su 
dischetto. L’elenco, i prezzi e le 
modalità d’ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 


#1 


NEW FOR THE_ 

pp le IBI 


Scheda Teleraster 

Le nostre schede Teleraster permettono di collega¬ 
re Telecamere B/N o colori con APPLE II e PC IBM. 
Il software di base consente di riprendere fotogram¬ 
mi (anche da video registratori), elaborarli, salvarli su 
disco, ottenere il negativo delie immagini, il windo- 
wing e successivamente riportare i risultati su carta 
tramite printers grafiche. Disponibili anche packages 
per generazione di pseudo colori, Enhancement del¬ 
l’immagine e hard copy su stampante a colori Low 
Cost, Oki-Mate 20. 



— Robotica 

— Termografia 

— Misure 


Applicazioni: 


— Riconoscimento di immagini 

— Ecografie 

— Archivio di immagini 


i [pstsnro 


j TELECOMUNICAZIONI 


TORINO - VIA ORMEA, 99 • TEL. 011/655.865 
CONDIZIONI PARTICOLARI PER DEALERS E HOBBISTI 
Richiedeteci LISTINO completo. 

OLTRE 90 PRODOTTI PER APPLE E PC IBM A CATALOGO 
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Per chi 
comincia 



N uovi lettori, siate i benvenuti. Queste 
pagine sono per voi, e le ripeteremo a 
ogni numero per facilitare il primo incontro 
con Applicando e con il mondo di Apple. 
Ovviamente queste righe non intendono 
sostituire i manuali, dei quali consigliamo 
caldamente la lettura, ma possono bastare 
per chi intende soltanto utilizzare i pro¬ 
grammi che pubblichiamo, copiarli, salvar¬ 
li su dischetto e farli partire. 

Cominciamo con qualche rapidissima 
premessa su Apple //. Quando accendete 
per la prima volta il vostro Apple con un 
dischetto già inserito nel drive e la tastiera 
posizionata suiringlese (per chi possiede 
Apple //e e Ile), dovreste veder comparire 
sullo schermo il segno "]", chiamato curso¬ 
re, o prompt, in inglese. Mentre se avete la 
tastiera posizionata su italiano, vedrete é. 
La sua presenza significa che potete fare 
una di queste tre cose: 

1) Fornire al computer comandi destinati 
al drive (per esempio CATALOG mostra il 
contenuto del dischetto, se si tratta di un 
dischetto in Basic). 

2) Fornire comandi nella versione per 
Apple del linguaggio Basic (e cioè l’Apple- 
soft Basic). 

3) Battere sulla tastiera righe di pro¬ 
grammi in Applesoft Basic. 

Per copiare un programma da Applican¬ 
do potrà essere necesario fare tutte e tre le 
cose. 

Per battere un programma 

di applicando 

Per prima cosa sarà opportuno leggere 
fino in fondo l’articolo che accompagna il 
programma. Può darsi che non capiate pro¬ 
prio tutto la prima volta: non preoccupate- 
vene, in seguito diventerà facilissimo. Cer¬ 
cate soprattutto le eventuali istruzioni che 
spiegano se occorre fare qualcosa, di parti¬ 
colare per battere il programma. In ogni 
caso assicuratevi di aver pronto un dischet¬ 
to già inizializzato per poter salvare quel 
che avrete battuto. Per i dettagli su come 
inizializzare un dischetto vergine, guardate 
i manuali: chi proprio ai manuali fosse al¬ 
lergico, faccia così: a Apple spento inseri¬ 
sca il dischetto System Master nel drive 1, e 
accenda il computer: quando il drive avrà 
smesso di girare (lueina rossa di nuovo 
spenta), tolga il System Master dal drive e 
inserisca al suo posto un dischetto sicura¬ 
mente vergine e sicuramente mai usato (at¬ 
tenzione: si possono ri-inizializzare anche 
dicchetti già usati, ma il loro contenuto va 
irrimediabilmente perso); ora basta battere 
NEW, Return, e poi INIT HELLO, sem¬ 
pre seguito da Return. 

Tutti i programmi in Basic consistono di 
una sequenza di righe di istruzioni. Tutte le 


righe sono numerate all'inizio, e possono 
contenere una o più istruzioni. Se le istru¬ 
zioni sono più d'una, esse saranno separate 
da segni di due punti (:). Per esempio: 


20 FOR J = 1 TO 5 : PRINT 
CHR$(7):NEXT J 


Per copiare da Applicando un program¬ 
ma, inserendolo nel vostro Apple, occorre 
assicurarsi che la memoria operativa del 
computer sia vuota battendo NEW Return 
(questa istruzione non cancella nulla di ciò 
che è registrato sui vostri dischetti: libera 
soltanto la memoria del computer dall’ulti- 
mo programma usato), ed è necessario poi 
battere i listati così come sono stampati, 
riga per riga, compresi i numeri di riga, 
battendo Return solo quando si arriva al 
numero di riga successivo. Quando sarà 
stata copiata anche l’ultima riga e l’ultimo 
Return (a fine riga), si potrà salvare il pro¬ 
gramma su dischetto (il dischetto che avete 
inizializzato, o un altro già inizializzato in 
precedenza su cui ci sia spazio libero a suffi¬ 
cienza). Per salvarlo basterà battere il co¬ 
mando SAVE, seguito dal nome che inten¬ 
dete dare al programma che avete trascrit¬ 
to. Questo è tutto, ma vediamo passo per 
passo un esempio. 


10 REM CAMPANELLO 
2 0 FOR J = 1 TO 5 : PRINT 
CHR$(7):NEXT J 
30 END 

Listato 1 


Per battere il semplice programma Cam¬ 
panello del listato 1 (produce solo un suono 
simile a quello di un campanello, null’al- 
tro), si seguirà questa sequenza: 

1) Battete NEW Return per cancellare 
dalla memoria qualsiasi programma prece¬ 
dentemente usato. (Se state lavorando su 
un Apple //e o un Ile assicuratevi che il tasto 
CAPS LOCK, il primo in basso a sinistra, 
quello che permette di ottenere tutte maiu¬ 
scole, sia schiacciato). 

2) Battete la linea 10 esattamente com’è 
stampata e premete il tasto Return solo alla 
fine dell’ultima parola (CAMPANELLO). 

3) Battete allo stesso modo anche le linee 
20 e 30. 

4) Con un dischetto già inizializzato nel 
drive (nel drive 1, se ne avete due), battete 
SAVE CAMPANELLO Return, per regi¬ 
strare il vostro programma su dischetto. 

5) Poiché il vostro programma è ancora 
nella memoria del computer, per farlo gira¬ 
re basterà battere RUN e premere il tasto 
Return. Se cancellate la memoria facendo 
girare un altro programma o spegnendo il 


computer, per usare nuovamente il pro¬ 
gramma occorrerà inserire il dischetto nel 
drive e battere RUN CAMPANELLO Re¬ 
turn. 

Alcuni suggerimenti 

I suggerimenti che seguono possono ren¬ 
dere il lavoro di trascrizione un po’ più 
facile: 

1) Se commettete un errore di battitura 
in una riga e non avete ancora premuto il 
tasto Return, basterà tornare indietro con 
la freccetta sinistra, correggere l’errore, e 
tornare al punto in cui eravate con la frec¬ 
cetta destra, premendo Return come al so¬ 
lito solo a completamento dell’intera riga. 
Se invece vi accorgete dell’errore quando 
ormai avete premuto Return e siete passati 
a un’altra riga, completate tranquillamente 
la riga che state scrivendo, compreso il Re¬ 
turn finale; poi ribattete la riga in cui avete 
commesso l’errore: ribattetela per intero, 
con numero di riga e tutto il resto, e la 
nuova versione prenderà automaticamente 
il posto della vecchia. 

2) Siate particolarmente attenti a non 
commettere errori di trascrizione nelle ri¬ 
ghe in cui compare l’istruzione DATA. 
Nelle altre istruzioni un eventuale sbaglio è 
più facile da individuare, perché penserà 
eventualmente il computer a segnalarlo in 
seguito, nelle istruzioni DATA questo in¬ 
vece non avviene. 

3) Salvate periodicamente il programma 
mentre procedete, per minimizzare i guai 
di una eventuale interruzione di corrente. 
Se non avete tempo per trascrivere tutto il 
progamma, trascrivete fin dove potete o 
volete (ma comunque completando fino al 
Return la riga che state battendo), poi sal¬ 
vatelo su dischetto come se aveste finito. 
Per riprendere a trascrivere sarà sufficiente 
inserire il dischetto nel drive, accendere il 
computer, e battere LO AD seguito dal no¬ 
me che avete dato al programma, e da Re¬ 
turn (battete CATALOG se non ricordate 
più con che nome avete salvato il program¬ 
ma). La luce rossa sul drive si accenderà, e 
il vostro programma verrà caricato nella 
memoria operativa del computer. A questo 
punto battete LIST, e vedrete scorrere sul¬ 
lo schermo tutta la parte del programma 
che avevate già battuto. Continuate adesso 
tranquillamente dal punto in cui avevate 
interrotto. 

4) Prima di effettuare modifiche o ag¬ 
giunte, trascrivete l’intero programma e fa¬ 
telo girare per prova. Questo renderà più 
facile la ricerca di eventuali errori, isolando 
quelli commessi durante la battitura e la 
trascrizione. Non preoccupatevi per il nu¬ 
mero di errori di trascrizione che farete: è 
normale. Il computer vi segnalerà, riga per 
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studio martinetti 



Se desideri una stampante professionale 
Se pretendi qualità per word processing 
Se vuoi stampare testi e grafici 
Se cerchi grandi prestazioni a un prezzo 
eccezionale 


THEN allora 

LET EPSON LX-8D = la tua stampante 



LX-80, la soluzione integrale più conveniente 


LX-80 è una nuovissima 
stampante frutto e sintesi di 
esperienze maturate in anni di 
leadership assoluta che hanno 
permesso alla EPSON di rea¬ 
lizzare un prodotto con presta¬ 
zioni professionali a un prezzo 
veramente conveniente. 


Caratteristiche 


Stampa bidirezionale otti¬ 
mizzata 100 cps, 80 colonne - 
Matrice 9x9 modo testo, 6x8 
modo grafico - Possibilità di 
generare caratteri originali - 
Stampa ad alta qualità per word 
processing - Oltre 50 codici di 
controllo software - Funzioni 
selezionabili da pannello fron¬ 
tale - Possibilità trascinamento 
a trattore e alimentatore fogli 
singoli - Interfacce, RS 232 C e 
IEEE 488 


/'EPSON> 


EPSON - SEGI S.p.A. - Milano - Via Timavo 12 - Tel. 02/6709136 







riga, dove avete sbagliato. Basterà a questo 
punto controllare la riga, individuare l’er¬ 
rore commesso e ribattere correttamente 
l’intera riga. A questo punto occorre salva¬ 
re di nuovo il programma su dischetto. 

5) Le lettere minuscole possono essere 
usate solo aH’interno di comandi che inclu¬ 
dono REM o tra virgolette. 

Programmi in 
linguaggio macchina 

Il Basic e il Dos sono ottimi linguaggi, 
ideati apposta per rendere più facile la pro¬ 
grammazione, ma l’Apple è in grado di 
ricevere comandi anche in un codice molto 
più vicino alla sua logica, chiamato linguag¬ 
gio macchina. Il linguaggio macchina è un 
po’ la lingua madre dell’Apple, un pro¬ 
gramma così composto sarà quindi compre¬ 
so dal computer molto più velocemente di 
un programma scritto in Basic. Per creare 
programmi in questa lingua si usa spesso un 
programma chiamato Assembler. L’As- 
sembler permette al programmatore di 
scrivere in un codice più facile del linguag¬ 
gio macchina: l’assembly. In un secondo 
momento il programma stesso si tradurrà in 
linguaggio macchina. L’Apple infatti non 
conosce l’assembly. 

Molti dei programmi che troverete su 
APPLICANDO saranno scritti in ambe¬ 
due le versioni: assembly e linguaggio mac¬ 
china; in questo modo potrete inserire le 
istruzioni direttamente in linguaggio mac¬ 
china, senza dovervi procurare il program¬ 
ma Assembler. In questo caso le istruzioni 
dovranno essere inserite direttamente nel 
System Monitor (da non confondere col 
monitor video): per raggiungere il System 
Monitor è sufficiente battere CALL-151 e 
schiacciare il tasto Return. A questo punto 
sullo schermo comparirà un asterisco (*) 
che indica che è stato raggiunto il contatto 
con il System Monitor. Per inserire i listati 
scritti in linguaggio macchina occorrerà al¬ 
lora battere, per esempio, i seguenti co¬ 
mandi: 

300: A2 05 20 DD FB CA F0 03 4C 02 03 60 
Return 

In questa serie di istruzioni il ’300’ indica 
una locazione di memoria e i due punti 
dicono all’Apple di inserire i seguenti nu¬ 
meri (A2 e gli altri numeri in base 16) in 
quella locazione. I numeri sono in base 16 
(esadecimale); non è necessario saper cal¬ 
colare con questa base per trascrivere i pro¬ 
grammi in linguaggio macchina, ma è im¬ 
portante sapere che in questo tipo di lin¬ 
guaggio i numeri sono dati sempre in esade¬ 
cimale. 

Facciamo un breve esempio di program¬ 
ma scritto in linguaggio macchina. Il se¬ 
guente listato serve a indirizzare alcuni dati 
in una particolare locazione di memoria: 

300.30B 

0300-A2 05 20 DD FB CA F0 03 
0308-4C 02 03 60 

Listato 2 


I numeri a sinistra delle lineette (atten¬ 
zione: le lineette non vanno digitate, al loro 
posto occorre battere un "due punti") sono 
le locazioni di memoria, vale a dire gli indi¬ 
rizzi dello spazio di memoria in cui il dato 
dovrà essere conservato, e i numeri seguen¬ 
ti sono il contenuto, i dati da memorizzare 
nelle sette locazioni di memoria indicate. I 
due numeri separati da un punto presenti 
nella prima riga indicano gli indirizzi inizia¬ 
li e finali della parte di memoria considera¬ 
ta. Questo programma è la traduzione del 
listato numero tre, scritto in assembly. Co¬ 
me si noterà le colonne a sinistra sono mol¬ 
to simili al listato numero due, contengono 
infatti le locazioni di memoria, mentre la 
parte a destra contiene istruzioni in assem¬ 
bly. Esistono diversi programmi assembler 
e diverse disposizioni dei listati, ma in tutti 
sono presenti queste due diverse colonne. 



1 

♦RINGER PROGRAM 


2 

ORG 

$300 


3 

BELL EQU 

$FBDD 

0300: A2 05 

4 

LDX 

m 

0302: 20 DD FB 

5 

LOOP JSR 

BELL 

0305: CA 

6 

DEX 


0306: F0 03 

7 

BEQ 

END 

0308: 4C 02 03 

8 

JMP 

LOOP 

030B: 60 

9 

END RTS 



Listato 3 



Per inserire i listati nella macchina è suf¬ 
ficiente eseguire le seguenti operazioni: 

1) Digitare CALL-151 Return per en¬ 
trare in contatto con il System Monitor, poi 
inserire la locazione di memoria, i due pun¬ 
ti e il contenuto della memoria; nel caso del 
listato numero due ad esempio si digiterà: 


300:A2 05 20 DD FB CA F0 03 Return 
308:4C 02 03 60 Return 


Un programma in Assembler sarà invece 
così inserito: 


300:A2 05 Return 
302:20 DD FB Return 
305 :CA Return 
306:F0 03 Return 
308:4C 02 03 Return 
30B:60 Return 


State attenti a non inserire lo spazio tra i 
due punti e il primo numero seguente, 
mentre invece bisogna mettere lo spazio fra 
le coppie di numeri. 

2) Una volta inserito l’intero listato, 
schiacciate CTRL-C Return per tornare al 
livello BASIC indicato dal segno ’]’. 

3) Al contrario dei programmi in BASIC 
che iniziano nella stessa locazione di me¬ 
moria, e che possono essere salvati con un 
semplice SA VE, i programmi scritti in lin¬ 
guaggio macchina possono iniziare in di¬ 


versi punti della memoria. Per salvare lista¬ 
ti o dati in linguaggio macchina si dovrà 
indicare quindi la locazione alla quale ha 
inizio il programma da salvare e la lunghez¬ 
za dello stesso (in decimale o in esadecima¬ 
le). Per il programma usato prima come 
esempio, il comando sarà: 

BSAVE RINGER, A$300, L$C 

dove A$300 è la locazione di memoria di 
inizio programma e L$C è la lunghezza del 
programma (la lettera C corrisponde al nu¬ 
mero decimale 12). All’inizio dei listati in 
linguaggio macchina pubblicati su Appli¬ 
cando troverete sempre l’indicazione della 
locazione di memoria di inizio e fine pro¬ 
gramma; esempio: 300.3EA mentre nel 
corso dell’articolo troverete i parametri per 
salvare il programma, esempio: BSAVE 
RINGER, A$300,L$C. 

4) Per rivedere il listato che avete tra¬ 
scritto basterà battere 300.30B, e sullo 
schermo si riprodurrà tutto ciò che avete 
battuto. Per ottenere una copia sulla stam¬ 
pante, basterà battere PR # (£ se siete in 
tastiera italiana) seguito dal numero dello 
slot al quale avete collegato la stampante 
(normalmente il n. 1) Return e poi ancora 
300.30B Return. Le correzioni si fanno ri¬ 
battendo solo la riga contenente eventuali 
errori. 

5) Per far girare il programma basterà 
allora digitare BRUN RINGER, senza 
l’indirizzo. 

Quanto esposto sopra è valido sia per il 
DOS 3.3 (sistema operativo per la gestione 
del drive che veniva fornito prima dell’usci¬ 
ta del //c) sia per il ProDOS (sistema opera¬ 
tivo fornito con il //c). Usando il ProDOS 
occorre però fare alcune precisazioni. 

I comandi del tipo SAVE, LOAD, 
RUN, CATALOG, ecc. vengono accettati 
anche in forma minuscola. 

Per formattare un disco non si potrà più 
usare il comando INIT HELLO, ma sarà 
necessario usare il disco UTILITIES di Si¬ 
stema fornito con il computer. Durante 
questa operazione vi verrà chiesto se il no¬ 
me del disco, assegnato automaticamente 
dal computer, va bene oppure se volete 
cambiarlo. Infatti tutti i dischi formattati in 
ProDOS (indicati come Volume) hanno un 
nome e vengono riconosciuti indicando 
questo nome dopo un comando diretto al 
drive. Per esempio se volete vedere il cata- 
log di un disco chiamato BLANK, dovete 
battere CAT/BLANK. 

Per non ripetere continuamente il nome 
del disco potete battere, prima dei comandi 
diretti al drive, PREFIX/nome disco segui¬ 
to da RETURN. Da questo momento tutti 
i comandi al drive saranno diretti automati¬ 
camente al disco scelto. 

Per vedere il catalog è sufficiente battere 
CAT. 

Durante l’uso di alcuni programi scritti in 
ProDOS potreste trovarvi una richiesta del 
tipo "PATHNAME?"; non spaventatevi, il 
pathname è il nome del disco al quale vo¬ 
gliamo fare riferimento, scritto entro due 
barrette (/) e seguito dal nome del file che 
vogliamo salvare o caricare in memoria op¬ 
pure trasferire da un disco a un altro. 


80 




Gruppo 


DunpuShup 


Apple Ile 

monitor Ile e supporto 
Disk drive aggiuntivo, 
Mouse. 


Macintosh 

512K RAM 


Apple IU 

128K RAM, 80 colonne 
Duodisk 



sinczlaii” 

ZX Spectrum 48K 



8 cassette originali, 

2 libri in italiano, 
supergaranzia Rebit. 

£. 365.000 iva inclusa 




SPECTRAVIDEO 

sincilsir - 

Commodore 


^cippkz computar 

m olivelli 


ROMA 


• Via Nomentana 265/273 

Tel. 8450078 

• Via L. Bonincontri 105/107 

Tel. 5140792 

• Via Famagosta 33 
Tel. 385408 


Ulteriori informazioni saranno fornite presso i punti vendita. 































Ecco altri cinque One-liners. E un appassionante concorso: 
'^rimandateci i vostri minimicro-programmi. Quelli pubblicati vinceranno... 


Altri programmi 
di una linea sola 


A bbiamo già pubblicato dei con¬ 
vertitori esadecimali/decimali in 
precedenza, anche sotto forma di 
One-liners. Quello che segue è tutta¬ 
via differente: si autoinstalla nel vo¬ 
stro Apple e diventa un servitore silen¬ 
zioso. Il RUN infatti crea un text file 
(di nome A), che viene scritto sul vo¬ 
stro disco. Ogni volta che state per 
iniziare una sessione di programma¬ 
zione, battete EXEC A, e l’utility di 
conversione verrà installata. Poi, se 
quando state scrivendo il vostro pro¬ 
gramma vi capitasse di aver bisogno di 
una conversione, basterà semplice- 
mente battere & seguito dal numero 
decimale da convertire, oppure &$ se¬ 
guito dal numero esadecimale. Questo 
One-liner non funziona sotto Pro- 
Dos. 


1M= CHRI <4): PRINT DVOPENA* 
: PRINT WURITEA': PRINT "C 
ALL-151's PRINT "3F5:4C 0 3 
N 300:AG 2 A2 1 BD 0 2 C9 24 
DO 1B BD 0 2 F0 B ? 30 90 0 
2 20 B1 0 E8 DO F0 20 A7 FF 
A6 3E A5 3F 20 24 ED 60 A9 
A4 20 ED FD 20 67 DD 20 52 E 
7 A6 50 20 41 F9 60 N 3D0G" : 
PRINT D*"EXECA B 


Una stringa di caratteri, qualsiasi 
stringa, si trasforma come per magia in 
suoni musicali. Questa è una routine 
divertente, ma può trovare anche 
qualche applicazione pratica. Per 
esempio, come suonerebbe il vostro 
nome e cognome? 


a. 


2 


FOR A = 771 TO 789: READ B: POKE 
A-B: NEXT : DATA 173.48.192 
.136.208,4,198,1.240.8,202,2 
08.246,166,0,76,3,3,96: HOME 
: INPUT "Batti quel che vuoi 
":A$:F = LEN <A$): FOR M = 

1 TO F: POKE 1,60:C* = MID$ 
(A$,M,1): POKE 0, ASC <C*): VTAB 
10: PRINT C$: CALL 771: NEXT 


Ecco un’immagine in alta risoluzio¬ 
ne: questa volta si tratta di una figura 
tridimensionale costruita in modo 
piuttosto intelligente. Poiché ci vuole 
qualche minuto perché la figura sia 
completata, può darsi che poi vogliate 
salvarla con il comando: 

BSAVE BUMP,A$4000,L$2000 

Se poi vorrete richiamarla potrete 
farlo con il programma: 

10 HGR2 

20 PRINT CHR$ (4)"BLOAD 
BUMP" 


-Una linea per vincere- 

Per trascrivere i programmi di una riga sola di questa pagina occorre 
batterli senza gli spazi, e sostituendo il punto interrogativo all’istruzione 
PRINT. Chi volesse produrne di suoi dovrà evitare l’istruzione IF, che 
come è noto manda il computer alla riga successiva se la condizione posta 
non è soddisfatta, mentre gli One-liners devono, per definizione, essere 
di una riga sola. 

Per facilitare la trascrizione di One-liners, o la creazione di propri 
programmi di questo genere, suggeriamo di digitarli come indicato più 
sopra e poi di salvare l’intera schermata: basta battere BSAVE VI¬ 
DEO, A$400,L$400. Sarà così possibile con un BLOAD VIDEO richia¬ 
marla sullo schermo nel caso qualcosa non funzioni, e ricopiare (usando il 
tasto ESC e poi le frecce) tutto il listato senza doverlo ribattere, interve¬ 
nendo eventualmente per le modifiche del caso. 

Tutti gli One-liners inviati dai lettori che verranno pubblicati saranno 
premiati con un dischetto del Disk Service a scelta. Per partecipare basterà 
indirizzare a: One-liners di Applicando, Corso Monforte 39,20122 Mila¬ 
no, indicando subito il dischetto del Disk Service desiderato in caso di 
pubblicazione. 



o 


C/5 

3 


DEF FN U(Z) = - 100 / ((1 * 

I / 2000) + (E * E / 1800) 4 

1) ;S = SIN (2.8):C = C0S < 
2.8): H6R2 ; HCQL0R= 7: FOR 
E = - 140 T0 140 STEP 17.5: 

FOR I = - 140 T0 140: HPLOT 
(I - E * 0 / 2 4 143, FN Ut 

2) + E * S + 112: NEXT I.E: FOR 

I = - 140 TO 140 STEP 17.5: 

FOR E = - 140 T0 140: HPLOT 
(I - E * 0 / 2 4 143, FN U< 

2) 4 E * S 4 112: NEXT E,I 


Ancora un’immagine in alta risolu¬ 
zione, velocissima questa volta. E 
sembra voler saltar fuori dallo scher¬ 
mo. Non lasciate nulla di fragile da¬ 
vanti al monitor! 


ri 

r* 


POKE 232,0: POKE 233,3: FOR X = 
768 T0 790: READ Y: POKE X,Y 
: NEXT : DATA 1.0,4,0.36.17 
2.46.46.62.246.228,22,39.56, 
246,32.39,37,37,12.54.0.0: HGR2 
: HCQLuR= 3: R0l= 0: FOR S = 

1 T0 64: SCALE= S: DRAW 1 AT 
140,96: NEXT : END 


E infine, ancora in alta risoluzione, 
un disegno tranquillizzante, che si for¬ 
ma molto velocemente sullo schermo. 
Usando la stessa tecnica si possono 
realizzare con grande facilità decora¬ 
zioni e abbellimenti da inserire nei vo¬ 
stri programmi. 


1 HGR : POKE - 16302,0: HC0LQR= 

7: DATA 1,0.4,0,44,62,0: FOR 
L = 1 T0 7: READ A: POKE L 4 



767,A: 

NEXT 

: POKE 232,0: POKE 

© 

233.3: 

FOR S 

= 20 T0 2 STEP 

« 

- 2: 

FOR Y = 

= 140 T0 40 STEP 

C Fi 

- 20: 

FOR X 

= 30 TO 240 STEP 

3 

40: POR L = ! 

3 T0 56 STEP 8: R0T= 


L: SCALE* Si 

XDRAW 1 AT X.Y: 


NEXT 

: NEXT 

: NEXT : NEXT 


Cento programmi one liner sono dispo¬ 
nibili su dischetto. I prezzi e le modalità 
d’ordine di questo e degli altri dischetti 
disponibili sono riportati nella rubrica 
Disk Service. 

- K 
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Il Primo 

Apple Computer Specialist 
a Milano 



L’intera gamma dei prodotti Apple a disposizione 
in un grande ambiente moderno ed accogliente. 
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Un team di programmatori ed esperti per 
garantire un’effettiva consulenza ed assistenza. 

Il software e gli accessori più aggiornati per tutti 
i problemi gestionali, professionali e didattici. 

Corsi di formazione e specializzazione sull’uso dei 
personal Apple (//e, //c, Macintosh e Lisa) e del 
relativo software applicativo. 

Software House, Rivenditore e Centro Assistenza 
autorizzato Apple. 



Produttore e distributore della Collana Software 
per Apple tra cui i noti programmi Util Writer //, 
Pro Writer //, Basic Writer // e Catenaccio. 


POLISISTEMI... per non fare solo shopping di mele! 

POLISISTEMI S.r.l. - via Derna 19-20132 MILANO - TEL. (02) 28.42.890/28.29.917/28.43.158 

Parcheggio Auto - MM2 fermata Cimiano 



























applicando 

si trova anche qui 

Ecco un elenco dei computer shop presso i quali è possibile abbonarsi ad Applicando , 
acquistare una copia, cercare un numero arretrato... 


LOMBARDIA 


Almé(BG) 

Elcod, Viale Italia 45/A 
Assago(MI) 

Basic Computers, Centro 
Commerciale Milano Fiori 

Bergamo 

Studio 15srl. Via Quarenghi 60 
Il mondo deirinformatica. Via 
Pitentino 8 

Brescia 

Alia computer. Via Bassi 26 
Brescia Computers srl, Via 
Malta 12 

Il Computer srl. Via B.Croce 23 
L’Informatica srl. Piazza 
Vescovado 1 

Personal Data, via Brozzoni 4 

Como 

Accaesse Informatica srl. Via 

Acquanera 46 

D.S.I. srl. Via DottesioS 

Gavardo(BS) 

Bit Shop. Via G. Quarena 120 
Lecco (CO) 

Computers Lecco snc. Via Nino 
Bixio 18/B 

Datamation. ViaTurati 10 
Lissone(Ml) 

Computerlandia, Via Martiri 
Libertà 103 

Melegnano (MI) 

L'Amico del Computer. Via 
Castellini 25 

Milano 

A.G.Informatica srl. Via 
G. Silva 49 

Communications Engineering. 
Piazza Firenze 4 
Deltron srl. Viale Gran Sasso 
50 

Edelektron srl. Corso 

Sempione 30 

Esprit, Via Bergamini 13 


Happv System, Piazza Diaz 6 
Information Technology. Via 
dei Bossi 7 

Airinformatica Shop. Via 
Lazzaretto 2 

Macan sas. Via Broletto 39 
Microtech Sistemi. Via 
Bronzetti 20 

SH Computers srl. Viale 
Montenero 33 
SoftecComputer. Viale E. 
Jenner23 

Monza (MI) 

ESI srl. Via Cavallotti 11 
Nikom Electronics. Via Asiago 
7 

Pavia 

M.A.S.H. Computer Systems. 
Strada Nuova 86 
Senna Gianfranco snc. Via 
Calchi 5 

Trezzano sul naviglio (MI) 
Personal computer shop. Via 
L.da Vinci 36 

Segrate (MI) 

Compusoft, Via Milano 2, 
Resid. Lago 

Varese 

IRPE srl. Via Morazzone 8 


LAZIO 


Lido di Ostia (Roma) 

A.C.S. - Advanced Computer 
System. Via S. Consacchi 10 

Roma 

Bit Computers, Via Giovanni 
Gastaldi 33 

Computer Center srl. Via Nizza 
48/52 

Computerart srl. Via Michele di 
Landò 41 

Computimesrl, Viale Parioli 25 
Easv Byte. Via Giovanni 
Villani 24 


E.D.P Market, Via E Fermi 
116/118 

E.M EUR Micro Computer 
srl. Viale C. Pavese 267 

5.1. G.E.E.I. srl. Via 
Nomentana 265-273 

5.1. PR.EL. srl. Via Pompeo 
Magno 94 

Roma EUR 

Bit Computers. Via F. 
Domiziano 10 

Viterbo 

Alfa Computer. Via Palmanova 
12/C 


VENETO 


Bassano del Grappa ( VI) 

A Tre snc. Via Buonarroti 23 
Conegliano (TV) 

Computing Program, Via G. 
Piovesana 32 

Mestre (VE) 

Pacinotti sas. Via Torino 92 
Mirano (VE) 

Saving Elettronica, via Gramsci 
40 

Padova 

Capovilla & C. sas. Galleria 
Scrovegni5 

Computer Service srl. Via 
Beethoven 3 
E.D.P. Sistemi srl. Via 
Borromeo 16 

Treviso 

A5 Computers srl, Borgo 
Cavour 37/A 

Venezia 

AZ Telemarket, Cannaregio 
5898 

Personal Computer. 
Cannaregio 


Verona 

ARMU srl. Via Teatro 
Filarmonico 3 

Esacompsrl. Via Roveggia 43 
MOS80sas. Via Germania 21 

Vicenza 

Sevi sas. Via S. Agostino 87 
Villafranca (VR) 

Studio4. Corso Vitt. Emanuele 
70 

PIEMONTE 
VALLE D AOSTA 


Aosta 

Intormatique sas. Av. Conseil 
desCommis 14 

Alba(CN) 

Centro computer. Via Paruzza 
2 

Biella ( VC ) 

Consul C omputer srl. Via delle 
Rose 2 

Informatica Biella sas. Piazza 
S.Paolo 1/B 

Domodossola (NO) 

Nuova Elettronica. Via 
Giovanni XXIII 68 

Novara 

DRsrl, V.le XX Settembre 19 
SPA srl. Via A. Canobio 16/A 

P inero lo (TO) 

Elaborazione Dati Pinerolo. 
Corso Piave 42 

Torino 

A.B.Computersas, Corso 
Grosseto 209 
Digitalsync snc. Corso 
Moncalieri 303 
Dimensione Personal, Via 
Berto la 22/e 

GE.NE.CA. srl. Via Bertola 5 
Hobby Elettronica, Via Saluzzo 
11/F-G-H 

Omicron Computers snc, C.so 
Duca degli Abruzzi 14 
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Pinto G.-Componenti elettr.. 
Corso Principe Eugenio 15 bis 
Tecnosystem Computer Shop, 
Via Beaumont 10 
Tekno Computerssrl, Via 
Madama Cristina 31/c 

TOSCANA 


Borgo a Buggiano (PT) 

CO-DI snc. Via 24 Maggio 119 
Firenze 

Anfrel Informatica sas. Via 
Masaccio 50 

Elettronica Cento Stelle srl. Via 
Cento Stelle 5/B 
Paoletti Ferrerò, Via il Prato 
40/42 R 

Pascal Tripodo Elettronica, Via 
B. della Gatta 26/28 
Soluzioni EDP srl. Corso dei 
Tintori 39R 

Massa 

Euro Computer sas. Piazza C. 
Bertagnini 4 

Montecatini , Fraz. Margine 
Coperta 

CO-DI snc. Via I Maggio 20/22 
Piombino (LI) 

Centro Ufficio sdf. Via F. 

Ferrer 37/39 

Pisa 

Società Elettronica Tirrena. 

Via Fucini 20 

Pistoia 

Inter Systems. Via Pietro 
Mascagni 14 

Pontedera (PI) 

Data Port srl. Via Brigate 
Partigiane 27 

S. Giovanni Valdarno (AR) 

I.C.S. srl. Via Garibaldi 46 

EMILIA ROMAGNA 


Bologna 

CEDA Minicompsrl. Piazza 
Aldrovandi 2/2 
Computer Systems. Via 
Ercolani 10/D 
EDP Sistemi BO srl. Viale 
Pietramelara 61 F 
SERCOM. Via B. da Carpi 9 B 

Cesena (FO) 

SHC snc. Corso Cavour 157 

Ferrara 

Soc. 1 ermomeecanica. Via 
Garibaldi 195 

Mazzacurati C laudio. Viale 
Cavour 186; 188 

Fecnomeccamca. Via Garibaldi 
195 

Fidenza (PR) 

Archimede, Via Vito Almi 2 

Fiore nzuola d'A rda ( PC ) 
Centro C omputer, Corso 
Gari baldi 125/A 


Forlì 

A-Z C omputer srl, Via Cignani 
7 

Kronos. Via Oreste Regnoli 30 

Modena 

Masetti Elettronica srl. Via 
Emilia Centro 211 

Reggio Emilia 
Computer Center srl. Via 
D. Alighieri 4 
Esaprogetti. Via F.Filzi 2 

Rimini 

Computer Line. Via C oletti 61 
Scandiano (RE) 

Informatica System. Via Statale 
13/A 

Viserba di Rimini (FO) 

C omputer Center, Via Pallotta 
25/A 

FRIULI VENEZIA 
GIULIA 


Gorizia 

Elcom. C'.so Italia 149 
Pordenone 

Electronic Center snc. Viale 
Libertà 79 

Turriaco(GO) 

Tecno Power Elettronica. Via 
Marconi 19 

Udine 

BIT Computers. Via Pozzuolo 
107 

PS Elettronica sas. Via 
Tavagnacco 89/91 C.C. 

LIGURIA 


Genova 

Computer C enter. Via San 
Vincenzo 129 r 
SALS Informatica spa, via 
D'Annunzio2 e V.le B. 
Partigiane 132 R 

Lavagna (GE) 

CR2 Informatica snc. Corso 
Genova 100 

La Spezia 

Softlinesrl. Via Piave 19 
Sanremo (IM) 

A.E.S.. Via Volta 24 

Savona 

Briano snc. C orso Tardy e 
Benech 20 r 

Sestri Ponente, Genova 

All Computer sas. ViaC. 
Menotti 136 r 

TRENTINO 


Trento 

SI.GE. snc. via Cesare Abba2 


SICILIA 


Catania 

Centro Informatica sdf. Via 
Firenze 211 

Computer Shop. Via E. 
Orlando 164 

SI.EL Informatica snc. via 
Etnea 289 

Messina 

C'ubeta srl. Via Cardines 12/14 
Milazz.o (ME) 

TectronTecnologie Elet. srl. 
Via dei Mille 

Palermo 

Informatica Commerciale spa. 
Via Notarbartolo 26 

Ragusa 

Sosvco. Corso V. Veneto 597 

Trapani 

Gualano Eugenio. Via Virgilio 
11 

MARCHE 


Civitanova Marche (MC) 
N.B.P. Elettronica, Via Don 
Bosco 11/13 

Jesi (AN) 

E.M.J. sas. Via F. Conti 4 
New Computer srl. Via 
N. Sauro 17/A 

Torrette di Ancona (AN) 
Sistedasrl. Via Velino 5 

CAMPANIA 


Barano d'Ischia (NA ) 
Matterà Antonio, Via Roma 61 
Benevento 

Masone Informatica, Viale dei 
Rettori 57 

Napoli 

Computer Systems srl. Via G. 
Santacroce 40 
Golden Computer srl. Via 
Michelangelo 7 
I.C. International C omputer, 
Viale A. Gramsci, 176 
La Barbera Carlo sas. Via 
Toledo 320 

Salerno 

Computer System, Via E. 
Bottiglieri 19 

SEDA srl. via Parmenide c/o 
i annone 

CALABRIA 


Catanzaro 

Visicom srl. Via Minniti 
Ippolito 10 

Cosenza 

Micro Systems sdf. Via Pane 
Bianco 26 


Gioia Tauro (RC) 

Tecnocompsnc, Via Nazionale 
SS 111/117 

Reggio Calabria 

GLM Informatica snc. Via De 

Nava 98 

Spezzano A Ibanese (CS) 
Iannibelli. Via Stragolia 48 

PUGLIA 

Bari 

L. e L. Computerssrl. Largo2 
Giugno 4 

Ciessespa. Via Re David 176/D 

Brindisi 

SIC srl. Viale S.Giovanni 
Bosco 109 

Foggia 

GE CO. srl. Via Valcntini V. 
Franco I 

Leverano(LE) 

Liberano Elettronica, Via 
C'.Salentina 19 A/21 

Manduria(TA) 

De Pasquale Ottavio, Via per 
Oria 80 

Nardo (LE) 

Salcosrl, Via XX Settembre 
122 

BASILICATA 


Matera 

Lucana Sistemi srl. Via Don 
Minzoni 4 

ABRUZZO 


Avezzano (AQ) 

Aspron. Via America 10/12 
Ghie ti 

Computer Poini sas. Viale 
Unità d'Italia 5 

L Aquila 

S.E.A.D. srl, via G. di 
Vincenzo 

Lanciano (CH) 

Electronic Microsystems, Via 
della Pace 3 

MOLISE 


Campobasso 

Informatica Molisana. Via 24 
Maggio 185/189 

UMBRIA 


Cerbora di città (PG) 
Computer Post. Via Madonna 
del Vento 

Foligno (PG) 

Linea informatica, snc. Via 
Garibaldi 81 
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ADW Studio 


SISTEMI DI DISEGNO CON COMPUTER 


Oggi ben tre soluzioni differenti Vi consentono di disegnare con il personal computer APPLE*. 
I sistemi offerti dalla Robo Vi permettono di realizzare una workstation completa, economica 
e su misura per le Vostre esigenze. Schemi elettrici, elettronici, circuiti stampati, impiantistica 
generale o particolare, diagrammi, architettura, meccanica, ingegneria, costruzioni: tutto ciò 
può essere disegnato con il sistema più adatto scelto tra il Robo 500, 1000 o 1500 in 
maniera semplice ed efficace anche senza conoscere il computer. 

Ogni sistema acquisisce infatti dati da librerie già esistenti o costruite dall'utente e tramite 
apposito software può plottare il disegno sui 
p otter più diffusi dal formato A4 
a formato A0 con una definizione 
il imitata e determinata unicamente 
dalla qualità del plotter utilizzato. 



* Sistema richiesto Apple ][+, He 64K, 
doppio disco, monitor 


COMPUTER GRAPHICS DIVISION 

MILANO: Via L. da Vinci, 43 - 20090 Trezzano S/N 
Tel. 02/4455741/2/3/4/5 -Tlx: TELINT1312827 
ROMA: Via Salaria, 1319-00138 Roma 
Tel. 06/6917058-6919312 - Tlx: TINTRO1614381 



























































Può riprendere qualunque immagine, oppure un testo, 
leggendolo direttamente dall’originale. L’immagine così 
ottenuta può essere poi trattata come un documento MacPaint, 
oppure trasmessa, via modem, a un altro Macintosh. 


Lo scanner multiuso 


S i chiama ThunderScan, è impor¬ 
tato in Italia dalla Elcom, Corso 
Italia 149, Gorizia, telefono 
0481/30909, costa 740.000 iva compre¬ 
sa ed è reperibile nei computershop. È 
un lettore ottico molto economico e di 
facile installazione: basta metterlo al 
posto del nastro della stampante, 
mentre l’originale da leggere va infila¬ 
to nel rullo della stampante stessa. Il 
risultato non è, ovviamente, di altissi¬ 
mo livello, in quanto l’immagine appa¬ 
re digitalizzata, ma la qualità è suffi¬ 
ciente per lavori come cataloghi di uso 
corrente che hanno bisogno, oltre del¬ 
la descrizione, anche di mostrare il 
prodotto. Oppure può servire a tra¬ 
smettere un’immagine o un testo, o la 
copia di un documento, anche dall’al¬ 
tra parte della terra, purché si abbia un 
modem e a ricevere ci sia un altro Ma¬ 
cintosh: il che equivale a possedere, 
senza spendere una lira in più, una di 
quelle costose e sofisticate apparec¬ 
chiature per trasmissione di immagini 
e documenti via telefono. Infine è un 
utile strumento per applicazioni grafi¬ 
che: infatti il disegno digitalizzato ot¬ 
tenuto con ThunderScan può essere 
poi trattato come un qualsiasi docu¬ 
mento MacPaint, e quindi ripreso suc¬ 
cessivamente per essere modificato a 
piacere. 

Come si è detto, è di facile installa¬ 
zione: basta collegare lo speciale adat¬ 
tatore (figura 1) alla porta della stam¬ 
pante sul Macintosch, mentre il cavo 
dellTmageWriter va collegato all’a¬ 
dattatore. Dall’adattatore stesso parte 
un filo al quale è collegato il lettore 
ottico che ha la stessa forma di un na¬ 
stro per stampante. Per leggere un’im¬ 
magine basta togliere il nastro e inseri¬ 
re al suo posto il lettore (figura 2). Per 
stampare l’immagine, basta togliere il 
lettore e rimettere al suo posto il na¬ 
stro. 

L’immagine, o il testo, da leggere 
con lo scanner va infilata, come se si 



Figura 1.11 colegamento del ThunderScan con il Macintosh e la stampante 
richiede pochi istanti: basta infilare la presa d’uscita della stampante allo 
speciale adattatore, e collegare quest’ultimo al Mac. 



Figura 2. Il lettore ottico ha le stesse dimensioni e l’aspetto del nastro per la 
stampante, per facilitarne l'installazione e la rimozione ogni volta che se ne 
ha l’esigenza. 
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fine del contrasto 


Figura 4. il software che compieta il ThunderScan permette la regolazione 

del contrasto e della luminosità, grazie anche a indicatori che funzionano durante la lettura dell'Immagine. 
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Mappa della pagina 



Figura 5. L’immagine può essere ridotta fino al 25% oppure ingrandita del 200%. 


Rettangolo di selezione: permette di definire 
quale parte del foglio verrà riprodotta 



Dimensione in punti 
del rettangolo di selezione 


Figura 6. Un apposito selezionatore permette di definire la parte del disegno 

da riprodurre. Se il disegno è troppo grande, un messaggio avverte automaticamente l’utilizzatore. 


trattasse di un normale foglio di carta, 
dietro il rullo della stampante, avendo 
l’accortezza di mettere l’apposita leva 
nella posizione foglio singolo anziché 
modulo continuo. Se l’immagine o il 
testo da'riprodurre non sono su foglio 
singolo, ma si tratta, per esempio, del¬ 
la pagina di un libro, basta fare una 


fotocopia e inserirla nella stampante al 
posto dell’originale. 

Il software fornito insieme con lo 
scanner permette la gestione del letto¬ 
re ottico con opzioni come: ingrandi¬ 
menti o riduzioni dell’immagine da ri¬ 
produrre, selezione del contrasto e 
della luminosità, scroll automatico 


dell’immagine riprodotta e, infine, al¬ 
cuni strumenti tipo MacPaint (la gom¬ 
mala matita, il selezionatore) per un 
editing semplificato prima della stam¬ 
pa. Se invece si vuole eseguire un edi¬ 
ting più sofisticato, basta salvare l’im¬ 
magine come documento MacPaint 
per riprenderla successivamente. 
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a^ffihelp 


Mini hard disk 

Il ProDos ha ampie possibilità rispetto al D.O.S 3.3 . 
Una delle principali è quella di poter gestire hard disk 
con una capacità massima di 32Kbyte. Forse non tutti 
sanno di avere praticamente nel loro Apple //e (con 
scheda 80 col+64K) e Ile un mini hard disk. Il ProDos 
riconosce i 64K Ram aggiuntivi come un disco rigido 
con una velocità di accesso quasi in tempo reale. La 
capacità effettiva è di 120 blocchi pari a 62440 byte ed è 
gestito esattamente come un drive. Si possono usare gli 
stessi comandi per il drive come SA VE, LO AD, DE- 
LETE, LOOK, UNLOCK, CAT, CATALOG, ecc.; si 
possono archiviare provvisoriamente dei programmi e 
lavorare con file di testo sia sequenziali che random. 
Ad esempio, dovendo lavorare con un data base con 
accesso continuo a disco per la registrazione e la ricerca 
dei dati, si potrebbe, prima di far partire il programma, 
caricare il file dal disco sulla Ram usando il copia file 
contenuto nel disco Utility di Sistema e al termine del 
programma riportarlo su disco, quindi far girare il pro¬ 
gramma facendo gestire il file di testo nella Ram otte¬ 
nendo una velocità di ricerca eccezionale. Una soluzio¬ 
ne più elegante potrebbe essere quella di scrivere po¬ 
che righe di istruzioni all’inizio del programma che 
eseguano il caricamento automatico del file nella Ram 
e alla fine del programma lo riportino su disco. La 
sintassi dei vari comandi per accedere alla Ram è: 
PREFIX/RAM; CAT/RAM; CATALOG/RAM op¬ 
pure PREFIX,S3,D2; CAT,S3,D2 e CATA¬ 
LOG,S3,D2. Per far girare un programma si può batte¬ 
re RUN/RAM/nome programma oppure -(lineetta- 
)/RAM/nome programma. L’attivazione del testo in 80 
colonne non disturba la RAM così come le operazioni 
rivolte ad altri drive. Tuttavia occorre ricordare che la 
grafica ad alta risoluzione a doppia definizione usa la 
stessa zona di memoria della RAM e quindi, prima di 
usare questo tipo di grafica o prima di spegnere il 
computer, dobbiamo riportare tutto il contenuto della 
RAM sul disco. 

Prodos e computer cuisine 

Nella tabellina relativa al funzionamento del pro¬ 
gramma COMPUTER CUISINE pubblicato sul nume¬ 
ro di Aprile abbiamo indicato che funzionava anche in 
ProDos. Ciò non era esatto. Vi indichiamo qui le due 
istruzioni da aggiungere per renderlo compatibile an¬ 
che con il ProDos. 

Programma RICETTE: inserire la linea 1425 PRINT 
D$;"CLOSE";FI$ e la linea 1710 va cambiata come 
segue 1710 PRINT D$;"CLOSE": PRINT D$;"OPEN 
";FI$;",L80". 

Inoltre, per rendere funzionale la routine di errore 
occorre modificare il rimando della linea 100 da GOTO 
1820 a GOTO 1810. 

Occorre inoltre ricordare che questo programma 
funziona solo con la scheda a 80 colonne. 

Non tutto è perduto 

Chi non ha mai commesso errori con il computer? 
Probabilmente a tutti è successo qualche volta, dopo 
aver scritto un testo o parte di esso con V AppleWriter e 
averlo salvato su disco, di doverlo ricaricare in memo¬ 
ria per rileggerlo o fare delle correzioni. Un attimo di 


distrazione e invece di battere CTRL L battete CTRL S 
e il nome del file. Attimi di panico: il file è irrimediabil¬ 
mente perduto e occorre riscrivere tutto? No, il file è 
solo apparentemente sparito perché l’istruzione SAVE 
non ha fatto altro che sostituire, sul disco, il primo 
carattere con uno "0" a indicare la fine del file, e quindi 
l’istruzione LOAD non lo riconosce più. A questo 
punto non resta altro che analizzare il file sul disco con 
dei programmi adatti tipo il DISK ZAP (vedi Applican¬ 
do n. 11) e riscrivere i caratteri cancellati. Se non 
conoscete questi programmi oppure non siete pratici di 
come sono archiviati i dati nel disco e non vorreste 
provocare danni irreparabili, battete il programma qui 
sotto indicato e fatelo girare seguendo le istruzioni che 
appariranno sul video. Penserà lui a rendere leggibile il 
file illeggibile. Quando leggerete il file con V AppleWri¬ 
ter troverete che i primi caratteri del testo sono stati 
sostituiti con degli asterischi. Riscrivete i pochi caratte¬ 
ri mancanti e salvate il file ritrovato. 


! REM RECUPERA FILE .APPLEWRITER 
3 REM COPYRIGHT 1985 BY G.C. 

10 CALl - 936 
20 D$ = CHR$ ■4/ 

30 ONERR GOTO 1?0 

40 VTAB 10: INPUT 'NOME FILE: a ;F$ 

50 PRINT "DRIVE N.: " 

60 ESS V l tf? ERSE : PRINT " SE MI W SOLO DRIVE. BATTI 

1 E HTaB 3: PRINT "SOSTITUISCI IL DISCO CON GUELlÓ * 

70 HTAB 3: PRINT "CONTENENTE IL FILE DA RECUPERARE": VTAB 22: HTAB 
5: FLASH : INPUT " BATTI <RE T URf4> PER CONTINUARE ";R$: N0RML 

80 P0KE 34,20: CALL - 936: P0KE 34,0: VTAB 11: HTAB 10: INPUT D 

90 11 ! OTAB 10: INVERSE : PRINT " RECUPERO IN 

lORSO ": NORMAL 


100 PRINT Dì;"VERIFY*;Fì;",D";DR 
110 PRINT Di;"OPEN":Fi 
120 PRINT Di : * READ ;Fi 
130 GET Ai: PRINT 


140 Jf.SLi.* AND Ai < > CHRI (13) THEN PRINT Dì: PRINT 
^..^OSE : CALL - 936: VTAB 11: HTAB 10: INVERSE : PRINT "R 
5 NCRMAL : VTAB 22 • PRINT “COPYRIGHT 1985 
150 

160 END 

170 ER = PEEK (222; 

180 1 F nL = rr 5 J HEN PR1NT : PR1NT W'CLOSE": PRINT DI:"ARRENO" ;F 
PRINT Di;"URITE ";Fi: PRINT PRINT Di ;"CLOéE”: GOTO 1 

190 'JJìk 1WERSE ! ™ B 11 ! HTAB 3." PRINT 
».!SJ E . FI HLS N - 0R I yE ERRATO 1 0 : NORMAL : F0R 1 = 1 T0 1500: 
NEXT I : GOTO 10 


Qualche volta può succedere di incappare in un disco 
con qualche traccia difettosa e purtroppo non sempre 
ce ne accorgiamo al momento delia formattazione. 
Questo disco viene usato tranquillamente per archivia¬ 
re dati e il difetto si fa evidente quando cerchiamo di 
caricare i nostri dati in memoria. Se abbiamo usato 
l’AppleWorks per l’inserimento dei dati e il computer 
visualizza sul video un messaggio di impossibilità a 
caricare i dati richiesti, prima di rifare tutto il lavoro 
possiamo fare un tentativo di recupero e se siamo fortu¬ 
nati che l’errore non è situato aH'inizio dei dati, una 
parte di questi è quasi sicuramente recuperabile. Per 
far ciò inserite il disco UTILITY di SISTEMA, fatelo 
partire, scegliete l’opzione DUPLICA DISCO e fate la 
copia del disco difettoso in un disco vuoto. Al termine 
di questa operazione provate a ricaricare i dati con 
l'AppleWorks. Se l'operazione dà esito positivo, facen¬ 
do scorrere il cursore vi accorgerete che a un certo 
punto il programma si bloccherà. Predete nota di que¬ 
sto punto, fate ripartire il programma da zero, aprite un 
altro file e copiate in esso la parte di dati prima del 
punto critico. Ora potete completare il vostro lavoro 
riscrivendo, nel nuovo file, i dati mancanti. 
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Fotostudio ZANti il- tacile 


GRUPPI DI 
CONTINUITÀ' STATICI 
NO BREAK 


L’esigenza di disporre di una fonte 
energetica continuativa, indipendente 
anche per un considerevole tempo dalla 
rete di distribuzione, con sufficiente 
autonomia, ha creato la necessità di 
realizzare un tipo di macchina in grado 
di fornire energia molto stabile in 
tensione e frequenza con distorsione 
molto bassa, sia in presenza della rete o 
meno. 

Impiegando questi gruppi di continuità 
per alimentare calcolatori, macchine 
contabili ed altri sistemi con memoria 
voltatile, si elimina ogni tipo di 
inconveniente causato dalla mancanza 
di rete, fornendo alimentazione in 
continuità senza alcuna commutazione. 
Inoltre questi gruppi di continuità si 
comportano anche da separatori di rete, 
e sopprimono eventuali disturbi e 
transitori. 


Uscita sinusoidale 
220V ± 1,5% 
distorsione 3% 

50 Hz ± 0,03%. 
Rete annessa 
220V ± 10%. 
Batterie ermetiche 
o stazionarie. 
Potenze da 100 W 
a 5 kW. 




STATICONTROL ' 


STEPCONTROL 400 


STEPCONTROL 250 


miDRDSET® 


ENERGIA E CONTROLLO 


SACILE ■ PN ■ ITALY 

VIA A. PERUCH, 64 
TEL. 0434 - 72459 
TELEX 450405 


CERCASI AGEN 
PER ZONE LIBE 


PRODUCIAMO INOLTRE: STABILIZZATORI DI TENSIONE, FILTRI E SEPARATORI DI RETE. 














annettere 


Investor 

Ho già scritto qualche me¬ 
se fa per chiedere chiari¬ 
menti in ordine al listato del 
programma IN VESTOR 
che alla riea 1780 da un erro¬ 
re di DIVISIONE: PER ZE¬ 
RO, anche se detto listato è 
stato piu volte scrupolosa¬ 
mente controllato. Nell'ulti¬ 
mo numero della rivista, 
poi, il listato relativo al pro¬ 
gram ma MICROCALC 
presenta senza dubbio di¬ 
verse manchevolezze, spe- 
cie nel listato 
SCRATCH-PAD. Infatti 
almeno a una prima attenta 
analisi, stando alla progres¬ 
sione numerica delle linee di 
programma, potrebbero 
mancare le linee 740, 1090. 
1280, 1840, 2090, 2100. 
2110. Inoltre alle linee 60, 
2170 e 2220, sono indicate 
delle GOSUB che richiama¬ 
no delle subroutine che non 
sono riportate, nel listato in 
quanto quest'ultimo termi¬ 
na alla linea 2890 (le subrou¬ 
tine sono infatti alle linee 
10000 ed oltre). Nel listato 
MICROCALC.il poi, alla 
linea 1060. alla fine della li¬ 
nea stessa, vi è indicata una 
istruzione GOT senz'altra 
indicazione: ciò potrebbe 
presupporre o una istruzio¬ 
ne GOTO ...0 una istruzio¬ 
ne GET... Nella speranza 
che queste osservazioni e la¬ 
mentele vengano recepite 
con il dovuto spirito costrut¬ 
tivo per sempre meglio pre¬ 
sentare la rivista ai propri 
abbonati, colgo l'occasione 
per ben distintamente salu¬ 
tare. 

Francesco De Vito 

(Ancona) 

L'errore da lei lamentato 
n elprogramma IN VES TO R 
è dovuto a un inserimento di 
dati errato e quindi il compu¬ 
ter si trova nella condizione 
di dover eseguire una divi¬ 
sione per zero come segnala¬ 
to. Le consigliamo di rileg¬ 
gere attentamente l'articolo 
relativo soprattutto riguardo 
alle varie opzioni di calcolo. 

Riguardo invece al listato 
SCRATCH-PAD le con¬ 
fermiamo che non esistono 


errori. Prima di copiare un 
programma occorre sempre 
leggere attentamente l'artico¬ 
lo per capire come funziona. 
Il programma M1CRO- 
CALC si compone di tre li¬ 
stati che vengono richiamati 
automaticamente uno con 
l'altro durante l'esecuzione 
del programma stesso. Oc¬ 
corre rispondere esattamente 
a tutte le richieste presentate 
sul video e al termine il listato 
SCRA TCH- PA D viene au¬ 
tomaticamente completato 
delle istruzioni mancanti. Le 
istruzioni mancanti sono 
quelle che l'utente costruisce 
con i suoi INPUT durante 
l'esecuzione del program¬ 
ma. Tenga presente che l'e¬ 
sattezza di un programma 
non si vede dalla sua nume¬ 
razione se è costante o meno , 
l'importante e che le istruzio¬ 
ni si susseguano in modo 
corretto. Faccia girare il pro¬ 
gramma è si accorgerà che 
funziona a dovere. 

L istruzione stampata ma¬ 
le alla linea 1060 è già stata 
riportata in alcune risposte a 
lettere pubblicate in queste 
stesse pagine. 

Microcalc 

Colgo l'occasione di que¬ 
sta lettera per segnalarvi un 
inconveniente che ho dovu¬ 
to incontrare nella digitazio¬ 
ne del programma MIC RO¬ 
GALE Le linee 1060 del li¬ 
stato Microcalc.il e 2260 del 
listato SCRATCH-PAD 
sono state semicancellate 
nella stampa e il computer 
segnala, quindi, degli errori 
in quelle linee: nella linea 
1060 dovrebbe essere chia¬ 
mata una linea (che invece 
risulta inesistente) con un 
GOTO che è invece presen¬ 
te come GOT ; nella 2260 è 
cancellata la parte che mette 
in relazione la B con il LEN 
successivo. Vi chiedo di ri¬ 
scrivere integralmente la 
1060 di Microcalc.il e la 
2260 di SCRATCH-PAD 
in modo da poter far girare 
in modo dovuto il bellissimo 
programma da voi pubblica¬ 
to. Un'ultima richiesta ri¬ 
guarda i caratteri di stampa 


dei programmi piu lunghi e 
interessanti, che. probabil¬ 
mente per ragioni di spazio, 
sono piccoli e a volte poco 
chiari: in particolare è diffi¬ 
cile distinguere gli "0" dalle 
"O" e ciò causa delle difficol¬ 
tà nel ricopiare i pro¬ 
grammi. 

Congratulandomi per la 
bella rivista e ringraziandovi 
anticipatamente, vi porgo i 
miei più cordiali saluti. 

Marco Chessari 

(Vittoria) 

La linea 1060 del pro¬ 
gramma MIC ROC A LC li 
termina con GOTO 1000. 
La linea 2260 del program¬ 
ma SCRATCH-PAI) e la 
seguente: 


I F B >1*10 a 
(LFNtCLSU ))}-! THEN 
tì$-LFFTSCFRROR 
".LFN(CLS(Cm. 


Per quanto riguarda la 
confusione tra lo /A RO e la 
lettera O vedremo di accon¬ 
tentare presto tutti i lettori 
pubblicando lo ZERO con 
la barretta trasversale. 

Animazione 
di una 
rotazione 
tridimensionale 

Ho 21 anni ed essendomi 
avvicinato solo da tre mesi al 
mondo dei computers (pos¬ 
siedo un M.P.M. 48K) sono 
ancora abbastanza inesper¬ 
to in questo campo. Nono¬ 
stante tale inesperienza vor¬ 
rei rispondere ad una lettera 
da voi pubblicata sul n. 
12-13 della vostra rivista, 
riguardante il programma 
ANIMAZIONE DI UNA 
ROTAZIONE TRIDI¬ 
MENSIONALE. Anch’io 
dopo aver battuto il pro¬ 
gramma non riuscivo a farlo 
girare per lo stesso motivo 
(BAD SUBSCRIT ER- 
ROR IN 2030). Forse posso 
essere di aiuto a Gianluca 
Rosso proponendogli di an¬ 


dare a rivedere la riga 8225. 
dove vengono dimensionate 
tutte le variabili, probabil¬ 
mente anche lui. come il sot¬ 
toscritto, si e dimenticato di 
battere e quindi di dimen¬ 
sionare qualche variabile (io 
ad esempio non avevo bat¬ 
tuto YN(8) e ZN(8)). 

Sperando di essere stato 
di aiuto a qualcuno, vi saluto 
cordialmente. 

Marco Capponi 

Animazione 
di uno 

spostamento 

piano 

Qualche tempo fa ho bat¬ 
tuto il listato ANIMAZIO¬ 
NE DI UNO SPOSTA¬ 
MENTO NANO, tratto dal 
n.9 di Applicando. Dopo 
aver dato il RUN. gli effetti 
di' animazione non sono 
quelli dovuti: i comandi del¬ 
la tastiera infatti rispondono 
a dovere ma la figura piana 
appare semplicemente co¬ 
me una linea (più o meno 
retta), pertanto la figura, sia 
essa un quadrato o un ret¬ 
tangolo come nel vostro 
esempio, non è affatto rico¬ 
noscibile. Al di là di possibili 
errori di battitura vorrei sa¬ 
pere se ci può essere qualco¬ 
sa che non va nel vostro li¬ 
stato. Vorrei anche indica¬ 
zioni su pubblicazioni circa 
l'uso del MOUSE APPLE 
(del quale sono possessore) 
e circa la preparazione dei 
programmi BASIC per l’uti¬ 
lizzo dello stesso con un Ap¬ 
ple //e. 

Laurenti Antonino 

(Pescara) 

Se è stato copiato l'intero 
listato dalla linea 100 alla li¬ 
nea 2035, senza tener conto 
dell'errore tipografico in 
fondo al listato pubblicato a 
pag.54 (listato 2), il pro¬ 
gramma deve funzionare a 
dovere. Come abbiamo spe¬ 
cificato più volte, i listati 
pubblicati sono la copia fo¬ 
tografica della stampa del li¬ 
stato originale e quindi privi 
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di errori. Ricontrolli tutto at¬ 
tentamente ed il programma 
funzionerà. 

Per la seconda domanda 
le consigliamo di consultare 
le pagine della rivista dove 
recensiamo mensilmente le 
pubblicazioni messe in com¬ 
mercio per Apple. 

AppleWorks 

Dove posso comprare 
APPLEWORKS e a che 
prezzo? 

Tosi Paolo 

(Bologna) 

Il programma APPLE¬ 
WORKS è in vendita presso i 
rivenditori autorizzati AP¬ 
PLE al prezzo di LIT. 
420.000 IVA esclusa. L'indi¬ 
rizzo lo trova sulle Pagine 
Gialle, oppure può vedere se 
c'è un negozio vicino a lei 
elencato in ''Applicando si 
trova anche qui". Poiché si 
tratta di negozi "amici" di 
Applicando, verrà senz altro 
trattato bene... 

Quesiti vari 

Vorrei rivolgervi alcuni 
quesiti ai quali spero di tro¬ 
vare risposta sui prossimi 
numeri della vostra inegua¬ 
gliabile rivista; 

1) La linea H)bO del pro¬ 
gramma MIC'ROC ALC II 
pubblicato sul n. 12 - 13 e in- 
c o m pietà (termina c o n 
"GOT" ma probabilmente si 
tratta di una istruzione 
"GOTO") 

2) Dispongo di un Ap¬ 
ple -compatibile ( Lemon 
II). Eseguendo il program¬ 
ma TEST EPROMS conte¬ 
nuto nel SYSTEM MA¬ 
STER fornitomi insieme al 
computer viene eseguito il 
seguente messaggio; 


DO OK 
D8 OK 
EO OK 
E 8 OK 
FO OK 

ERR. SFB09 


vuol dire che c’è qualcosa 
che non va? E quali inconve¬ 
nienti comporta? 

3) E' possibile listare un 
programma in linguaggio 
macchina se non se ne cono¬ 
scono la locazione iniziale e 
finale? 

4) E' possibile listare in 
applesoft un programma 
scritto in linguaggio mac¬ 
china? 

Ringraziandovi anticipa¬ 
tamente per la vostra atten¬ 
zione e sicuro della vostra 
collaborazione vi porgo i 
miei più distinti saluti. 

Gicco Giampiero 

La correzione alla linea 
1060 del programma Ml- 
CROCALC. Il e stata già ri¬ 
portata. assieme ad altre mo¬ 
difiche riguardanti il miglio¬ 
ramento del programma, 
nella pagina delle lettere del 
N. 15. Riportiamo lo stesso la 
correzione, certi di fare cosa 
gradita a tutti i lettori. La li¬ 
nea 1060 termina con GO¬ 
TO 1000. 

La sua seconda domanda 
è già una risposta. Se durante 
l'esecuzione di un TEST il 
numero di una locazione di 
memoria è preceduto dalla 
parola ERR. vuol dire che la 
EPROM o la ROM o la 
RAM relativa a quella zona 
di memoria è difettosa. Sei 
suo caso, essendo la zona di 
memoria da D000 a TEFF 
relativa all'Applesoft, è pro¬ 
babile che qualche comando 
non funzioni a dovere. 

I programmi scritti in lin¬ 
guaggio macchina non pos¬ 
sono essere listati in Apple¬ 
soft perché l'interprete Basic 
non troverebbe un riscontro 
valido per la conversione. I 
programmi in linguaggio 
macchina che si possono li¬ 
stare pur non conoscendone 
la locazione di partenza so¬ 
no solo quelli registrati su di¬ 
sco. E sufficiente caricare in 
memoria il programma indi¬ 
cando la locazione di memo¬ 
ria alla quale vogliamo cari¬ 
carlo con BSA VE nome pro¬ 
gramma. ASnumero (in esa- 
decimale) oppure A numero 
(in decimale). Per listarlo si 
passa in Monitor battendo 


CALE-151 seguito da RE¬ 
TURN quindi si batte il nu¬ 
mero (in esadecimale) della 
locazione di memoria alla 
quale abbiamo caricato il 
programma seguito da L e 
da RETURN. Si avrà così il 
disassemblato composto da 
venti righe di programma. Se 
si vuole continuare nell'ana¬ 
lisi del programma occorre 
soltanto battere L al termine 
di ogni videata. 

Apple II e //e 

Vorrei sapere da voi che 
differenza c’è tra i program¬ 
mi per Apple II e quelli per 
Apple //e e se esistono testi 
validi per imparare a pro¬ 
grammare su Apple //e. 

Leale Claudio 

Alessandria 

Non esiste nessuna diffe¬ 
renza sostanziale nei pro¬ 
grammi per Apple II e He se 
non nella quantità di memo¬ 
ria richiesta per il loro fun¬ 
zionamento in quanto il Ile 
viene fornito con 64k di me¬ 
moria, quindi tutti i pro¬ 
grammifatti per Apple II gi¬ 
rano sicuramente anche sul 
He. Per quanto riguarda i li¬ 
bri, le consigliamo di leggere 
la rubrica Applicosa, all in¬ 
terno della quale recensiamo 
spesso libri utili. 

Microcalc 

Ho copiato il listato del 
programma MICROCALC 
pubblicato sul n. 12-13. 
Purtroppo ho rilevato una 
disfunzione che pregiudica 
gran parte dell’utilità di tale 
programma. Una volta sta¬ 
bilito il tracciato e imputato 
i dati, il programma provve¬ 
de regolarmente alla regi¬ 
strazione. Al momento di ri¬ 
vedere i dati con il program¬ 
ma CARICA FILE il pro¬ 
gramma si blocca e non 
compare alcun messaggio. 
Ho sbagliato qualcosa nel ri¬ 
copiare il listato o c’è qual¬ 
cosa che non va nel pro¬ 
gramma ? 

Ho più volte eseguito il 
programma BRIDGE pub¬ 
blicato sul n. 12—13 e ho ri¬ 


scontrato molti errori nel¬ 
l’aggiudicazione delle prese, 
nell’aggiudicazione della di¬ 
chiarazione e nella doppia¬ 
tura della stessa. Visto che 
tali inconvenienti non si ri¬ 
petono sempre, vorrei sape¬ 
re da che cosa può dipende¬ 
re. Inoltre sempre in merito 
allo stesso programma vor¬ 
rei sapere quali opportune 
modifiche poter apportare 
al programma in modo da 
poter giocare anche quando 
è EST-OVEST ad aggiudi¬ 
carsi la dichiarazione. 

Dispongo da circa un an¬ 
no di un LEMON II (Apple 
compatibile) correlato dal 
SISTEM-MASTER. No¬ 
nostante abbia ormai rag¬ 
giunto una certa dimesti¬ 
chezza col BASIC e col 
computer in mio possesso, 
vi sarei grato se poteste dir¬ 
mi la funzione dei singoli 
programmi del S I - 
STEM-MASTER. Ringra¬ 
zio anticipatamente 

Sacco Giampiero 

Per il primo quesito con¬ 
trolli la linea 1060 del pro¬ 
gramma MICROCALC II 
perché nella stampa del lista¬ 
to sulla rivista è stata tronca¬ 
ta una istruzione. La linea 
deve terminare con GOTO 
1000 . 

Il programma BRIDGE è 
stato da noi provato per pa¬ 
recchio tempo e non abbia¬ 
mo rilevato gli inconvenienti 
da lei lamentati, quindi non 
possiamo darle alcun sugge¬ 
rimento se non quello di con¬ 
trollare ancor più attenta¬ 
mente il listato. Al program¬ 
ma, così com’è fatto, non è 
possibile apportare modifi¬ 
che perché la sua lunghezza 
è esattamente uguale alla 
quantità di memoria dispo¬ 
nibile per iprogrammi in ba¬ 
sic al di sotto della prima pa¬ 
gina grafica ad alta risolu¬ 
zione. Quindi aggiungendo 
anche una sola linea di istru¬ 
zione si rischia il blocco del 
programma quando attiva la 
pagina grafica. Occorrereb¬ 
be reimpostare tutti i punta¬ 
tori sia delTinizio program¬ 
ma sia della tavola delle figu¬ 
re. 
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Listati senza fatica 

e 

Tutti i programmi di Applicando possono essere trascritti e quindi salvati su 
dischetto. Ma la trascrizione è lenta e noiosa, e sbagliare fin troppo facile. 

Ecco perché Applicando offre, già pronti, i dischetti con i programmi 
sottoindicati: per ottenerli, è sufficiente inviarci il tagliando debitamente 
compilato. 


APPLICANDO 1 

AP1/I02 Profitti. In tempo reale l'analisi del break-even point, punto di 
pareggio, di una qualsiasi azienda. Calendario perpetuo. Dal 1582 in 
poi tutto quello che si può sapere sui giorni passati e futuri. I tronchi 
del tesoro. Una spericolata caccia al tesoro a nuoto, fra le insidie di 
tronchi galleggianti. Lire 30.000 (abbonati 25.000). 

AP1/N03 Eliminatore di Dos. Uno strumento per aumentare del 10% 
la capacità di un normale floppy disk. Orologio. Per trasformare 
l’Apple // in un orologio con rintocchi, allarme e lancetta dei secondi. 
Pronti puntare fuoco! Guardiano di un castello abbandonato, hai 25 
colpi da sparare contro gli intrusi. Lire 30.000 (abbonati 25.000). 

APPLICANDO 2 

AP2/IN04 Costi chilometrici auto. Un programma per calcolare e 
confrontare i costi di qualunque auto. Richiamafigure. Posizionare, 
ingrandire, ruotare, cambiar colore, aggiungere figure a quelle di una 
tavola . Laser nello spazio. Battaglia a colpi di laser contro asteroidi e 
alieni per difendere la torretta spaziale. Lire 30.000 (abbonati 25,000). 

APPLICANDO 3 


nei sedici spazi a disposizione. Tastierino fantasma, una routine per 
avere a disposizione un tastierino numerico anche sull’Apple //. Routi¬ 
ne di input. Due subroutine, una per i dati numerici l’altra per gli 
alfanumerici, per il controllo dell'input. Lire 30.000 (abbonati 25.000). 

AP4/A09 Organo, violino, pianoforte (dischetto Pascal, occorre lan- 
guage card o Apple //e o He). Ecco come, col Pascal, si riesce a 
simulare i tre strumenti attivando l’altoparlante dell’Apple da program¬ 
ma. Lire 30.000 (abbonati 25.000). 

APPLICANDO 5 

AP5/N08 Investor. In tempo reale il quadro esatto di come vanno i 
propri investimenti finanziari. Con cinque prospetti riepilogativi e 52 
periodi di quotazione, Investor è uno dei programmi più completi in 
questo settore e in assoluto il più economico. Lire 70.000 (abbonati 
60.000). 

AP5/N09 Agenda personale. Per ricordare ora per ora gli appunta¬ 
menti di un anno intero memorizzando fino a 15 appunti ogni giorno. 
Duello d’artiglieria. Vince chi sa calcolare meglio la velocità del 
vento, la gittata e l’elevazione della canna. Mele e freccette. Versione 
computerizzata del popolare gioco delle freccette che nulla toglie al 
gusto del far centro. Lire 30.000 (abbonati 25.000). 


AP3/IN05 Sistema base. Un data base modulare con tutte le caratteri¬ 
stiche essenziali per mettere ordine nei propri archivi. Etichette. Eti¬ 
chette spiritose e bizzarre, di lavoro o di ogni genere, stampate facil¬ 
mente e nel numero desiderato. Contratti. Con il WPL, il linguaggio di 
programmazione dell’Apple Writer, bastano cinque minuti per un do¬ 
cumento di pi’ pagine personalizzato. Gran catalogo. Una routine per 
avere il catalogo del dischetto su due colonne, 42 file per volta, e 
richiamarli con un solo tasto. Lire 30.000 (abbonati 25.000). 

AP3/A06 Equo canone (occorre Visicalc). In Visicalc un modello che 
permette, a inquilini o proprietari, l’esatto calcolo dell’equo canone. 
Lire 25.000 (abbonati 20.000). 


Sistema base - AP3/IN05 

Un data base modulare che ha 
il pregio di costare pochissimo 
e di offrire possibilità operative 


Investor - AP5/N08 



Per seguire le azioni in Borsa, con 
grafici, media mobile a 15 e 52 
settimane, medie volume e prezzo 




che nemmeno programmi 
di costo molto superiore hanno. 



APPLICANDO 4 

AP4/N07 Lettura sprint (versione italiana e versione con frasi in 
inglese). Un reading improver per leggere di più a parità di tempo. 
Rompiquindici. Il piccolo rompicapo delle quindici pedine da ordinare 


APPLICANDO 6 

AP6/N10 Obbligazioni/Bond Manager. Per avere un quadro comple¬ 
to e concreto dei rendimenti dei titoli a reddito fisso. PucMan/Nibbler. 
Versione in alta risoluzione per Apple del famoso videogame a getto¬ 
ne. Line finder. Letteralmente trova righe, questa utility permette di 
localizzare facilmente i segmenti di un programma. Lire 30.000 (abbo¬ 
nati 25.000). 

AP6/N11 Stress. In Pascal (occorre language card o Apple //e o Ile). 
Per giocare, ma soprattutto per inventare giochi, il programma si pone 
in alternativa agli usuali videogame. Lire 55.000 (abbonati 45.000). 
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m. ©aiiK servici 


Applicando è lieto di offrire ai propri lettori la possibilità 
di sottoscrivere un abbonamento a 5 o 10 dischetti, a scelta 
fra tutti quelli presentati nel Disk Service, a un prezzo 
eccezionalmente vantaggioso: 

100.000 lire per 5 dischetti 
180.000 lire per 10 dischetti 


In pratica pagherete, rispettivamente, 20.000 lire o 
18.000 lire a dischetto, Iva e spese di spedizione comprese 

q ualunque sia il prezzo di vendita del singolo dischetto 


Basta che compiliate il tagliando qui sotto e lo inviate 
a Applicando, abbonamenti Disk Service, Corso Monforte 
39, 20122 Milano, unitamente a un assegno non trasferibile 
intestato a Editronica srl e al vostro primo ordine. Per 
ordinare i dischetti, adesso e successivamente, utilizzate 
il buono d'ordine pubblicato alla pagina seguente, 
specificando sempre che siete un abbonato del Disk Service. 
L’abbonamento non ha una scadenza, e quindi i 5 o 10 
dischetti potete ordinarli nell'arco di tempo che più vi 

aggrada. 


Sì, desidero sottoscrivere il seguente abbonamento: 
| 1 5 dischetti, per un importo di 100.000 lire 

| 1 10 dischetti, per un importo di 180.000 lire 


Nome. 


Cognome. 
Indirizzo - 
CAP_ 


Città 


PV 


Data 


Firma 


tmm 






















Stress - AP6/N11 

Il programma ideale per chi ha 
l'Apple //c (ma gira anche sul //e) 
e che consente di inventare 
sempre nuovi giochi. 


APPLICANDO 7 

AP7/N12 Apple pittore. Si possono realizzare sullo schermo capola¬ 
vori di pittura, ottenendo effetti speciali di grande efficacia. Ottovolan¬ 
te. Un tutorial per insegnare ai bambini a riconoscere i numeri che 
rimbalzano sullo schermo. Diskblock. Una routine che permette di 
evitare che qualche curioso possa avere libero accesso in programmi 
riservati. Archivio per Apple. Per avere un back-up dei programmi più 
importanti da dischetto a cassetta o viceversa. Discoteca. Una banca 
dati che tiene sotto controllo la collezione di longplaying e di cassette. 
Aiuto. Alla fine della battitura di un programma, Aiuto vi dirà quanti 
errori ci sono e a quali linee. Lire 30.000 (abbonati 25.000). 


Apple pittore - AP7 /N12 


APPLICANDO 10 

AP10/N14 Ripristino. Come ripristinare programmi persi per un’acci¬ 
dentale istruzione di New o di Fp. Disk Map. Un detective del Dos per 
scoprire dove e come vengono immagazzinati i dati analizzando la 
mappa dei bit occupati. Autonumber. Una routine per autonumerare 
automaticamente i programmi e allineare le linee con un ritorno carrel¬ 
lo in input. Lire 30.000 (abbonati 25.000). 

AP10/T17 Rette nel piano cartesiano. Come individuare in cinque 
modi diversi una coppia di rette in un piano cartesiano e avere visualiz¬ 
zate le equazioni relative ai valori assegnati. Statistica. Come analiz¬ 
zare la correlazione fra due fenomeni o due caratteri e l'indice o 
coefficiente di Bravais che ne effettua la misura. Lire 30.000 (abbonati 
25.000). 

APPLICANDO 11 

API 1/N18 Apple edicola. Una banca dati per avere sotto controllo un 
articolo, il suo numero di pagina, la rivista su cui è stato pubblicato. 
DiskZap. Il programma indispensabile per il debugging di un dischetto 
che ne risolve la maggior parte dei problemi. Messaggi personali. 
Quando la persona non c’è, per lasciare un messaggio basta impo¬ 
starlo sulla tastiera. L’Apple farà il resto. Comparatore di programmi 
in basic. Una routine per risolvere dubbi sulle diverse versioni di uno 
stesso programma. Trappola per pochi. Un cacciatore contro tre 
animali feroci. Vince chi riesce a intrappolare senza essere intrappola¬ 
to. Lire 30.000 (abbonati 25.000). 

API 1/T19 Espressioni. Come risolvere un piccolo dramma familiare 
con l'aiuto di un elaboratore personale. Lire 25.000 (abbonati 20.000). 

APPLICANDO 12-13 


Potrete realizzare sullo schermo 
capolavori artistici con effetti 
speciali di grande efficacia 
ma soprattutto facili da ottenere. 


APPLICANDO 8 

AP8/N13 Cambiacomandi/Messaggi. Un programma che insegna 
come personalizzare i messaggi propri del Dos dell’Apple. Le Mans. 
Un gran premio di formula uno da giocare in due o da soli contro il 
computer. Appleorgano. Una combinazione di linguaggio macchina e 
di Applesoft che trasforma l’Apple in un melodioso organo. Lire 30.000 
(abbonati 25.000). 

AP8/T14 Momento di una forza/Colpo all’asta. La dimostrazione 
didattica del ribaltamento di un corpo solido appoggiato a un piano 
quando viene applicata una forza orizzontale che supera il momento in 
senso opposto dovuto al peso. Hard copy pagine in alta risoluzione. 
Se la stampante risponde a determinati criteri di compatibilità, con 
questo programma si possono far miracoli. Lire 30.000 (abbonati 
25.000). 

APPLICANDO 9 


AP9/N15 Fuoco fatuo. Un appassionante adventure game con un 
persorso intricatissimo, mille trabocchetti, un troll e una principessa. 
Apple artista. Per destreggiarsi nella grafica ad alta risoluzione usan¬ 
do lo schermo come tavolozza e la tastiera come pennello. Data hello. 
Una semplice routine che permette di disporre di una clock card 
inizializzando i dischetti con giorno, mese e anno. Lire 25.000 (abbo¬ 
nati 20.000). 



AP9/T16 Sistema di forze parallele. Fissandone l’intensità e la posi¬ 
zione questo programma permette di visualizzare il centro di un siste¬ 
ma di forze sotto forma numerica e grafica. Traslazione e rotazione 
di una figura piana. Come far ruotare, traslare, rimpicciolire, ingrandi¬ 
re sul video una figura piana. Lire 30.000 (abbonati 25.000). 


AP12/N20 Bridge. Un programma in altissima risoluzione grafica che 
permette di imparare il bridge o di giocarlo contro il computer. Micro- 
cale. Un foglio elettronico di calcolo, spreadsheet, che mette a disposi¬ 
zione 20 righe per 20 colonne per un totale di 400 caselle da riempire 
come si vuole. Applesoft Line Editor. Una potente utility che permet¬ 
te l’editing dei programmi in Applesoft e aggiunge all'Apple un più 
ampio controllo del cursore. Lire 30.000 (abbonati 25.000). 

API 2/A21 Budget (occorre Appleworks). Un prospetto che con l'inse¬ 
rimento di dati mensili e di medie preventive calcola automaticamente 
le medie consuntive e i relativi saldi mensili e annui. Lire 15.000. 

AP12/A22 Budget (occorre Visicalc). Un prospetto che con l’inseri¬ 
mento di dati mensili e di medie preventive calcola automaticamente le 
medie consuntive e i relativi saldi mensili e annui. Lire 15.000. 

AP12/A23 Cinque modelli Spreadsheet, tre modelli data base, due 
modelli Word Processor. Versione per Appleworks. Due dischetti. Lire 
80.000 (abbonati 70.000). 

AP12/A24 Cinque modelli Spreadsheet. Versione per VISICALC. Lire 
40.000 (abbonati 35.000). 

API 2/T25 Animazione di una rotazione tridimensionale. Un esem¬ 
pio di come una rotazione tridimensionale permette di rappresentare 
gli oggetti proprio come li vediamo. Trasformazione da File a Data. 
Una utility per risolvere il problema di aggiungere a un programma 
preesistente delle istruzioni DATA ricavati da un altro file. Lire 25.000 
(abbonati 15.000). 
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APPLICANDO 14 

AP14/N26 Golf. Un programma in altissima risoluzione grafica che 
permette di disegnare il proprio percorso di golf per poi giocarci a 
piacimento con gli amici. Autopiù. Con l’aiuto di questo programma 
non dimenticherete più gli appuntamenti fissi dedicati alla manutenzio¬ 
ne della vostra automobile. Lire 20.000. 

AP14/N27 Applebaby. Tre giochi didattici: il primo per imparare a 
contare in età prescolastica; il secondo per ripassare le tabelline; il 
terzo per esercitarsi nell’ortografia. Lire 20.000. 

AP14/A28 Rimborso spese, (occorre Appleworks). Un prospetto che 
vi permette di preparare le vostre note spese automaticamente in 
cinque minuti. Lire 15.000. 

AP14/A29 Rimborso spese, (occorre VisiCalc). Un prospetto che vi 
permette di preparare le vostre note spese automaticamente in cinque 
minuti. Lire 15.000. 

API 4/T30 Frutteti. Un aiuto a risolvere uno dei più classici problemi dì 
estimo. Instant Poster Voi scrivete con la tastiera del vostro Apple la 
frase che volete, e subito dalla stampante esce un poster formato 
gigante. Lire 15.000. 


AP15/A32 Computer cuisine. Un ricettario computerizzato sul quale 
memorizzare ingredienti e ricette a centinaia, eliminando così sia il 
fastidio di mille pezzetti di carta sparsi per i cassetti, sia il pericolo di 
perdersi preziose ricette. Con possibilità di stampa delle singole ricette 
e un menù completo dei migliori piatti creati da Gualtiero Marchesi, il 
più famoso cuoco d’Italia. Occorre scheda 80 colonne. Lire 20.000. 

AP15/T33 Euclide. Il massimo comun divisore e il minimo comune 
multiplo in un programma che ne permette l’immediata comprensione. 
Isomeri. Fa parte del più ampio progetto americano Seraphim, per lo 
studio della chimica. Lire 15.000. 


Sintetizzatore - AP1VN31 

Una utility per creare adeguate colonne 
sonore nei vostri programmi. Nel dischetto 
sono già registrati: batteria laser, canti 
di uccelli, esplosioni, canto dei marine, ecc. 


APPLICANDO 15 

AP15/N31 Sintetizzatore di suoni. Con questo programma potete 
dotare i vostri lavori di una colonna sonora eccezionale; permette 
infatti la sintetizzazione dei suoni più diversi: dal canto dell'uccellino, 
alla mitragliatrice, da treno in corsa all'aereo, e tantissimi altri, compre¬ 
sa la musica. Volano. Un gioco in alta risoluzione per due sfidanti. 
Illustratore. Un programma di grafica che offre la possibilità di realiz¬ 
zare ottimi disegni anche a chi non è troppo ferrato in materia. Auto¬ 
schermo. Crea in automatico videate di presentazione dei programmi 
inseriti in un dischetto; dall’aspetto molto professionale, evidenzia 
infatti i programmi con una barra luminosa comandabile con le frecce e 
fa partire il programma così evidenziato con un semplice Return. Lire 
30.000. 




APPLICANDO 16 

AP16/N34 Dieta personalizzata. Con questo programma, un pratico 
sistema di Data Base nutrizionale, è possibile personalizzare, a se¬ 
conda della propria costituzione fisica e delle abitudini alimentari, una 
dieta bilanciata, a lungo o a breve termine. Il dischetto contiene un file 
dati di 400 cibi, la cui composizione è analizzata in calorie, proteine, 
grassi, vitamine, colesterolo. Lire 25.000. 

AP16/N35 Designer. Il concetto dei potenti e costosi programmi di 
CAD/CAM alla portata dell Apple //, per fare del computer uno stru¬ 
mento per disegnare semiprofessionale. Il gioco dei pompieri. E’ 

(Continua a pag. 98) 




In 30 minuti puoi 
scoprire se ti serve 
un personal computer. 


^ Apple Computer 
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applicando 


Disk Service 


scoppiato un incendio, e voi siete un pompiere che deve salvare il 
maggior numero di persone prima che muoiano soffocate tra le fiam¬ 
me. Se sbagliate tre volte, sarete nei guai: il severo comandante... Per 
listare bene in vista. Programmare è divertente, creativo, affascinan¬ 
te. Ma talvolta bisogna tornare sul listato per correggere e modificare 
qualcosa. Allora può capitare di pentirsi di aver preferito la compattez¬ 
za alla chiarezza. A meno che non si faccia uso di questo programma. 
Timer. Un efficace programma per trasformare l’Apple // in un fedele e 
preciso contasecondi che avverte del passare del tempo, e al momen¬ 
to giusto... Lire 25.000. 

API 6/N36 Cento One-liner. Utilities, routines, dimostrativi di grafica e 
di suoni, e perfino giochi. Cento programmi su un solo dischetto, tutti 
rigorosamente scritti in una sola linea di Basic. Da usare così come 
sono, da studiare come esempi di sintesi, o da trasferire nei vostri 
programmi. Lire 25.000. 

AP16/N37 Rubrica telefonica. (Occorre AppleWorks). Un’agenda 
telefonica che individua in tempo reale qualunque numero memorizza¬ 
to, che stampa le etichette per spedire gli auguri di Natale e di Pasqua 
solo a chi volete voi, che seleziona, con molteplici possibilità, gruppi di 
nominativi e stampa elenchi su carta da distribuire aggiornati ogni 
mese ai collaboratori. Lire 15.000. 


Cento one-liner - AP16/N36 

Cento programmi di una linea sola: 
Utilities, routines, dimostrativi 
di grafica e perfino giochi. 


APPLICANDO 17 

AP17/N38 Strade d’America. Pianifica un qualunque itinerario stra¬ 
dale americano tra ben 171 città diverse, fornendo le sigle delle strade 
da percorrere, l'elenco delle città intermedie e calcola la distanza in 
miglia dei tratti intermedi e la distanza totale dalla città di partenza a 
quella d’arrivo. Uragano. Su una piccola città indifesa una tempesta si 
abbatte implacabile: distruggerà tutte le case e ucciderà ogni abitante, 
in un crescendo di violenza incontrastabile. Un rifugio ci sarebbe, ma 
come raggiungerlo? Non c’è proprio speranza. A meno che... Gioco ad 
altissima risoluzione grafica. Lire 30.000. 

AP17/N39 Regress. Ideale per manipolare dati con funzioni statisti¬ 
che, questo programma è destinato soprattutto a chi ha bisogno di uno 
strumento veloce per eseguire analisi di carattere statistico, con la 
conseguente possibilità di chiedere previsioni in base all’andamento 
delle regressioni sui dati inseriti. Calcolatrice RPN. Con questo pro¬ 
gramma, l’Apple diventa una sofisticata calcolatrice che impiega per 
l’input la notazione polacca inversa, con una catasta operativa di 
quattro registri, e permette calcoli complessi. Sparate a vista. Siete 


appostati contro un muro e comandate un potente cannone atomico 
...ad aria. Dal cielo fluttuano oggetti non meglio identificati: alcuni 
lentamente, altri un po’ meno. Voi, questi oggetti, dovete respingerli. 
Peccato, però, che dall’altra parte ci sia un avversario con un altro 
cannone... Lire 25.000. 

AP17/A40 I conti del negozio. (Occorre AppleWorks). Diviso in due 
file, simili per impostazione ma diversi per utilizzo, questo modello di 
Spreadsheet è utilissimo per seguire l’andamento giornaliero e mensi¬ 
le di un negozio. All’apertura del negozio coincide l’apertura di un 
foglio vuoto del modello: per ogni movimento di cassa è possibile 
memorizzare la causale, il tipo di pagamento e a cosa si riferisce. Il 
computer calcola i totali per ogni voce e indica quale è stato il movi¬ 
mento di cassa giornaliero, tenendo conto degli ordini e dei saldi per 
impegni precedenti. Un’ultima sezione elabora i dati suddivisi per 
categorie merceologiche e calcola le percentuali di ripartizione degli 
utili su ogni articolo. Lire 50.000. 

AP17/A41 I conti del negozio. (Occorre VisiCalc). Lo stesso di 
AP17/A40, ma con VisiCalc. Lire 50.000. 

APPLICANDO 18 

AP18/N41 Trivia. Stregherà milioni di italiani facendoli giocare, la 
novità che viene dall America: si chiama Trivial Pursuit ed è destinato a 
diventare il gioco dell’anno. Per sperimentarlo in anteprima, Applican¬ 
do ne propone una versione per Apple //, per di più personalizzabile e 
quindi utile anche per studiare o ripassare, oltre che per divertirsi... 
Bioritmi. Ci sono giornate in cui conviene non uscire nemmeno di 
casa, perché va tutto storto; e ci sono giorni baciati dal destino in cui si 
naviga sull’olio. Sarebbe bello conoscerli in anticipo e organizzarsi 
meglio la vita. Con questo programma si può seguire l’andamento dei 
propri bioritmi: tutti e tre i cicli, mese per mese. Occhio ai consumi. 
Volete sapere quanto consuma la vostra auto? Potete annotare dili¬ 
gentemente la percorrenza e i litri di carburante e poi fare i relativi 
calcoli. Oppure, molto più semplicemente, caricare su Apple questo 
programma, utile per valutare anche altri tipi di consumi... 

AP19/N42 Regolatore del bip. Ci sono momenti in cui il //e, con tutti 
quei suoi bip, sembra ridere dei nostri errori. Che fare? Spegnerlo e 
uscire a fare due passi? Cambiarlo con il Ile. che ha il volume regolabi¬ 
le? Mettersi i tappi nelle orecchie? No, la soluzione è un’altra, semplice 
e davvero simpatica... e soprattutto funziona! Comparatore di grafici. 
Avere il grafico di una funzione può essere inutile se poi non si 
possono esaminare i particolari del suo andamento in una certa zona. 
Se poi si deve vedere la differenza tra due curve diverse c’è da fare un 
difficile e poco preciso lavoro di comparazione. A meno di non utilizza¬ 
re questo programma che... impaginatore di messaggi. Peravere le 
scritte perfettamente centrate sia sul video che sulla stampante occor¬ 
re tanta pazienza e tanto occhio. Oppure avere in memoria questo 
impaginatore che, all'occorrenza, può servire anche da word proces¬ 
sor. Utility per ProDOS. Prefix, Subdirectory, Pathname? Sono 
termini che bisogna conoscere per programmare in ProDOS. Questa 
utility non solo aiuterà a capire e imparare con facilità, ma, soprattut¬ 
to... 
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il punto grafico - osnago 



Quattro milioni di dischetti ODP venduti 
in Italia dal 1978 fanno del dischetto ODP 
un best seller dell'Informatica. Un suc¬ 
cesso determinato dall’alta affidabilità 
del dischetto ODP, risultato della tecno¬ 
logia edella ricerca più avanzata. Per que¬ 
sto scegli un best seller, scegli ODP. ■ 
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